



DISCOLOGY 



POUR VOUS SURPASSER 

3 Programmes en 1 
pour votre Amstrad CPC 




L'EDITEUR: 

Un Editeur univi 
exceptionnelle, ( 



e secteurs et de fichiers. Grâce à sa boî 
sembleur. Calculatrice, Listeur Basic.) h 



LE COPIEUR: 

Un Copieur intégral pour la sauvegarde de vos disquettes e 
Il vous étonnera par ses performances et sa simplicité d'utilî; 

L' EXPLORE UR : 

Un graphique animé en Temps Réel" qui vous révélera tou! 
disquettes. Un programme sans équivalent. 

LES 7 POINTS FORTS DE DISCOLOGY 

> La facilité : Grâce aux Fenêtres, aux Menus Déroulants et 

> La vitesse: 160 Ko de Langage Machine pur! 

> La documentation : Un Manuel comple 

> La compatibilité : Il gère toutes les exten: 

> La performance : Incroyable et absolue, 

> L'inédit : Du vraiment jamais vu ! 

> La référence: Des milliers d'utilisateurs enthousi 
à l'Etranger. DISCOLOGY est reconnu et acclai 



technique approfon 
et les lecteurs 5 1/4 p 



es en France comme 
par la presse internationale. 



le MERIDIEN Informatique 5 at 7, La can.bièr. 13001 Man.il!. Tél. : 91.94.15.53 



^ê 



BON DE COMMANDE 



D Je commande DISCOLOGY au prix de 350 F 

□ Je commande Master Save V 3.2 (Copieur seul) au prix de 1 90 F 

□ Je possède déjà Master Save et je commande DISCOLOGY 
Je joins ma disquette Master Save et je ne paye que 160 F 

Nom: 



Version 5.1 pour Amstrad CPC 
Disponibilité immédiate. 



Je règle ma commande : 

□ par chèque joint (port gratuit) 

□ contre -remboursement (+ 30 F de frais de port) 



Tél.: 



A retourner à MERIDIEN Informatique - 5 et 7, La Canebière - 13001 MARSEILLE 



c Ë MERIDIEN 

■INFORMATIQUE 




Titus 



Puisque nous sommes dans les 
récompenses, Titus fait aussi dans la 
création, Titan a reçu, toujours à 
Chicago, un oscar de l'innovation 89. 
Allons bon mais les éditeurs français ne 
vont rien laisser aux pauvres 
américains ? 



N'OUBLIEZ PAS ! 

AMSTAR & CPC 

SORT AUSSI 

EN AOUT ! 



Mandarin 
software ■ 



Une intéressante étude portant sur 
le stress des cadres en entreprise et 
principalement sur les moyens 
employés pour évacuer cette 
tension a été menée en Angleterre 
pour le compte de Mandarin. O 
surprise c'est le jeu sur micro qui 
remporte le plus de suffrages 
devant l'alcool, les cigarettes et le 
sexe. 500 cadres ont ainsi eu à leur 
disposition la simulation Lombard 
Rally pendant 3 mois. Alors, à 
quand les logiciels de jeux 
remboursés par la Sécurité sociale? 



IMICROMANIAJ 


HIT PARADE 
AMSTRAD 464-6128 


OECE 

MOIS 


mois] 

TITRE DER- 
NIER 1 


1 


FORGOTTEN WORIDS 


SEW 


2 


DOUBLE DETENTE 

Océan 


SEW 


3 


VIGILANTE 

US. Gold 


SEW 


4 


BARBARIAN 2 

Paloce 


1 


5 


DRAGON NINJA 

Océan 


3 


6 


LA COMPIL'OCEAN 


4 


7 


THE GAMES SUMMER Edit. 
Épy» 


NEW 


8 




NEW 


9 


ROBOCOP i 5 

Océan 


10 


GARY LINEKER HOT SHOT 
Qramfo 


10 


11 


OPERATION WOLF 
Owan 


11 


12 


WEC LE MANS 

Océan 


6 


13 


HATE. 
Oceon 


14 


SUPER SCRAMBLE NEW 


15 


LE MONDE L'ARCADE NEW 

'JSGoià 


NOUVEAUTES A SURVEILLER 


1 


INDIANA IONES, IAST CRUS 


ADE 


2 


NEW ZEALAND STORY 
Octan 




3 


CABAL 




4 


PANIC STATIONS 

Gremlin 




5 


LES JUSTICIERS (Dragon Ninjo 
(Robocop, Rombo 3) Océan 










93.42.57.12 

Depuis PARIS 16.93.42.57.12 


PARIS : Boutiques MICROMANIA : 
FORUM DES HALLES 

5, rue Piroustte Niveau -2 
Métro ei RER Les Halles 45.08.15.78 

PRINTEMPS HAUSSMAN : 

64, bd Hauijman, Espace Loisirs sous-sol 
Métro Havre-Caumartln 42.82.58.36 



AMSTRAD I 464 
'6128 



ssrssss- 




COMPILATIONS — | - COMPILATIONS (suite)-j 



DÉMENT ! 

LA COMPIIAT'O" 
SE l'II* •' 

OC COMBAT 
DE CHEZ OCÉAN ! 

lS S JUSTICIERS 14SM95f 

+ DRAGON N1NJA 
* ROBOCOP 
+ RAMBO 3 

'super" 

DÉMENT.' 

LA COMPIL' OCEAN WjW 
MARCHE DU CAPITAINE BEOOD 

+DALBY T11OMPS0NS 
OL.YMPlQUE.CUALi.LNGh. 
l-THE V1ND1CATOR 
4-S.M-AMANDIiR 

UmSTdE L'ARCADE 149,199F 

+ROADBI, ASTERS 
+TIGER KOAD 

+ 144.1 

.IMPOSSIBLE MISSION 2 
.Si-Y HL'NTER+BLACKBEARD 
H.ÇOL OSSK' ' ' 

DtXSURDIX 149 

+MERCHNARY 

-IIARDBVLL 

i-ARMAGUEDON ma\ 
fLEVlATHAN 
►BOBSLEIGH 
+SHACKI .ED 
i-TOANTOR+CHOLO 
-XENO+10TH FRAME 



GEANTS DE LARCAOE 2 149.199F 
►STREEI F1GHT1 R 

i-UIOMC COMMAMjO 
fSiDE 4.RMS 

Gi vsviokr 
►UESOLATOR 

*SILACKLED 



12 JEUX EXCEPTIONNELS 12914 
+CYBERNGID 

-DEII.F.KTOR 

+ V1ASK +BLOOD BROTHERS 

♦NEBULUS+HERCUL-ES 

+-NORTHSTAR+EXOLON 

-IIS MAITRES DE I I.MVFSS 
tVENOM STRtKES BACK 
+MARAI DER+RANARAMA 

OCEAN DYNAMITE 149199F 

-fPLATOON 

4-PREDATDK 

+KARNOV 

tCSAZY CARS 

+COMBAT SCHOOL 

«■CRI /OR 

-t-SALAMANDER+DRILLER 

BESTDEUSGOLD 149 199F 
+OL I RUN 

+GAUNTLET 2 
-CAI..NUKNIA GAMES+7: ( ï 
+RO! I ING TfflN'DER 

LES DEFIS DE TAITO 149,199F 

-1 A R r ; F- T RFNEGADL 
+ARKANOID 1 
+ARKANOH3 2 
■iHIHBl.F. BOBBLE 
■ FLYING SHAKK+S APFKÎHT 

GAME SET MATCH 2 149,199F 
+MATCHDAY2 
+ BASKETM ASTER 
«-SUPER HANG ON 

+<_'HA\1l'ÏO\ CHIP SPR1M 
+TS UK ANDFIELD 

+t RICKET+SNOOKEH ■ 



HISTORY IN MAKING 199.249F 

^Ll ARDERBOARD 
-EXPRESS RA1DER 
+IMPOSS1BUS MISSION 
+SI PERCTCLE+GAUNTLE i 
+HFACH HEAD+INFILTRATOR 
-Kl NG FI MAS 1ER 
+5P1 liUNTER+ROAB RUNNER 
+BRUCELEE+GOONIES 
■WURL GAMES+RAID 
+BEACH HEAD 



-COMPILATIONS (suite)- 

FOHCES MAGIQUES 149/1 99F 
+ PANTHERE ROSE 
+ WESTERN CAMES 
+CLEVHR AND SMART 
+OPERAT NEMO+DAK.AR 4X4 

SPACEACE 129149F 

+CYBERNOID+NORTWSTAR 

+7YNAPS+TRA.NTOR 
+EXOLON + XFVIOI S 
+ VENOM NTRIKES BACK 

TEN MEGA GAMES 3 129/1 49F 

+LEADERI30AKD 

+ HITUIRAME+I ASTMLSSION 

+1 IREI ORU+ROCCO 

+R AN AR A M A+FIGHTERP1LO I 

-"IMPOSSIBLE --CITY SUCRER 

^DRAGON TALK 

FIST AND THROTTLES 119.139F 

-ENDL RO KACER 

+BUGCY BOY 

.IKARI WARRIOR 
-DRAGONS LAIR 

+THUNDERCATS 

LES FUTURISTES 149.199F 

+BOB MOKA. S. F.* SYNDROME 

+CRAKION ET XI"NK 

4-CYROR.nESPOTIK DESIGN 

+STARBOY+!.IIEI'ISS 

+7 COMME 7.ARK DAVOS 

KARATE ACE 115,175F 

-KT\G H MASTER 
-DR'. Ci I II- 
-LUI! MATAJUDO 

+A VENGER 

*THEWAYOFTHETJCER 

+SAMOUKAI TR1TXXJY 

+THF WAY OF EXPLODING IIS r 

ELITE6PACKN ; 3 95/145F 

>DR,\'..0\S I AIR ]•: 

+ENDUKO RACCER 

^APERBO) 

+GHOS1 NCOlifil.INS 

+TLLR N'EST PAS 1HLER 



COMPILATIONS (suite) - 

ARCADE ACTION 115.185F 

4-BARBARIAN 
+RENEGADE 

+SLPERSPR1NT+RAMPAGE 
+INTER NATIONAL KARATE 2 

COLLECT. KONAMI 115/185F 

+JACKAL+SHAOEINROAD 
+NEMESIS+JAILBREAK 

+YE ARKING H >MIKIE 
+GREEN BERET 
+-YEAR KUN. FU 
+HYPERSPOKT + PINGPONG 

TOP TEN COLLECTION 99.145F 

-.SABOTEUR I 
+SABOTEUR.2+SIGMA 7 

+t:KmCALV)ASS+MRWOLF 
+THANATOS-IJEFP STRJK.E 
+COMBATLYNX+BOMBJACK 1 
t TURBO ESPRII 

GAMESETMATCH 129/1 79F 

+TENNIS-ETVTFRSPI >R l-PINGCONG 
+I-OOT-I C.OLI--UASFBALL 
+BOXTNG+POOL. SCI' DECATHLON 

SPECIAL ACTION 99149F 

+GRYZOR+I ARGFT RENEGADE 

+ 7 \Tri;NATIiiN.M KARATE+ 

+SALAMANDER 

+BASKEI MASTER-SIIAOEIN R 



SONT D'ABORD 



DEMENT!!! Kit de Télécharaement 99 F 
Avec ce kit vous allez pouvoir télécharger 24H/24, 
7 jours sur 7, des centaines de Hits pour le simple 
prix d'une communication téléphonique sur 
3615 AMCHARGE. 




TEL. 93.42.57 n\ c , eS T OtMJ— „,.«.«. I SUR TOUS 



ZT,^jttt^ 



IBS LOGICIELS 



AMSTRADl 464 
'6128 



3415 MICROMANIA 
C'EST eCANT!!' 



HT<.«»èo"' oZT'promolios "TU 
flash fous («« i»»» . 



Passez un été «o-.- b -M.CRO M AN,A 



SïnROMflNlflJ 



- NOUVEAUTES — 

A NE PAS MANQUER" 



y?/i-k-F 



ACTION SERVICE 
CABAL 
INDIANA JONES: 
NIE LAST CRI/SADE 95/I45F 
NEW ZEAI AND STORY 95/1 45F 
PANIC STATIONS 09/1 4y F 



r- AUTRES NOUVEAUTES n 


BLACKLAMP 


N9/1.W 


BLOOBWYCH 


95 T 45F 


BOMBIZAL 


4>J. Î44F 


CARRIER CCAIMAM 


14= !<■•[■ 


DOMINATOR 


09/ 1 49F 


DOt BLE DRAGON 


99, 1-flh 


JAWS 


9s/ 145F 


KULT 


I49']0')F 


LICENCE TO K1LL 11(17 W 14'Jl- 


MEURTRE A VENISE 


l45'19rF 


PROJECT STEAI.THF. 


l-Vi'^F 


PRO SOCCLR SIMULAT '»:1-WI' 


RICK DANGFROl S 


95445F 


RUNMMÏ MAN 


95/ 145F 


SKATEORDIE 


■i? 1451 


STAR TRF.k 


<Wï4SF 


STLK.AR 


95. 145F 


TI\IF SCANNER 


99,149F 


TINTINSI R LA LUNE 


145/1951- 


\ IGILANTE 


99 /149F 


WEIRD DRf-^iMS 


49/I99F 


XENAPHOIIE 


105 if?!' 



i HIT PARADE — -, 


AFTER BURNER 


99/;49r ; 


BARBARIAN 2 


89/i39h 


BlTCHERlllLL 


99/I49F 


CHUCK YEACER'S 




ADV FLIGHT TRAINER 


95/145I-' 


CRAZY CARS 2 


pu/l'^F 


DOLHI.h DETENTE 


9vi/!49F 


DR \GON NINJA 


99/1491/ 


iORGOTTEN WORLDS 


49/I49F 


GARYL. HOT SHO'l" 


95/1 15F 


MICROPROSE SOCCER 


ino/itoF 


PURPI.RSATUR.NbD. 


-y/;i«E 


RENEGADE 3 


99 • 1491. ■ 


ROliOCOP 


99/i49F 


STORMI.ORD 


99/ ] 49F 


SUPER SCRAMBBLE 


99/149I/ 


GAMES SUVÎMER F.DT'l 


M.. M- 


XYBOTS 


99' i 49F 



3 D POOL 
BLMPV 
CHICAGO 90 
DARK FUSION 
LIRE ANDFORCÏET 
FOOTBALL MANAG 
GUVSHIP 
H.A.T.E. 



5/:45T 



99/ 



• • Ces logiciels doivent 

sortir prochainement. 

Téléphonez ou tapez 
1 3615 MICROMANIA etvou: 
i connaîtrez la disponibilité 

exacte de chaque logiciel. 



-SUPER PROMOTION - 

MANETTES ET CABLES 

PORTE- CLEFS MICROMANIA 
REPRODUIT FIDELEMENT 
LE LA7F.R. LA MITRAILLETTE. 
LE LANCEMENT DE GRENADE.. 
ET AUTRES EFFETS SPECIAUX. 
MANETTE US GOLD 109F 

i PU S IIISH MONTRE DIGITALE 
GRATUITE! 
MANETTL V\ 

PRO 5000 129F 

CHKETAH MACH1 129E 

CHEETAH 125+ «5F 

CORDON POUR 
BRANCHEMENT 
DE DEUX MANETTES 49F 
C \BLE MAGNETO AV1ST.49F 
CABLE D'EXTENSION 
POUR JOYSTICK 49F 

! CABLE DE 

■ TELECHARGEMENT 49F 

HOUSSE DE PROTECTION 
MOI SSL CPC 464 COLL. 89F 
HOUSSE CPC 464 MONO S9F 
110LSSL CPC 6128 COUI. 89F 
HOl. SSL CPC 6128 MONOS9F 

I DISQUETTES VIERGES 
4 CASSETTES VIERGES 29L 
4 DISQUETTES VIERGES 99F 



MF.ROhS OL LANCE 

HUMAN KILLING VI. 99/149F 

UIGIIWAYPATROL 145/1 95F 

LAST DUEL 99/149F 

LE MANOIR DE MORT ND/199F 

OBLIILRATOR 99/I49F 

OPERATION WOLI' 99/149F 

PAC MANIA 99/149F 

RAMBO 3 89/ 139F 
REAL GHOSTBLSTERS 90.T49F 

RTYPE 95/1451- 

RLLN THE GAUNTLET: 99/149F 
LA COURSE INFERNALE 

SAVAGE 95/I49F 

SCRABBLE DE LUXE ND/225F 

SILKWORM 95/145F 

SKWEEK I45/I95F 

SUPERMAN 95'I45F 

THE ELIMINATOR 95/1J9F 

THE LAST NINJA 2 125/ J 45F 

T11LNDLRBLADE 99/1 49F 

THUNDERB1KI» 125/145F 

TIMES OF LORE 95/145E 

VLND1CATORS 99/I49F 
WAR IN MID. EA 
WEC LE MANS 



SOLDES DISQUETTES 
49 F 

4X4 OFF ROAD RACING 

720 ^ 

HEADOVER HEALS 

IMPOSSIBLE MISSION 2 

L'EMPIRE CONTRE AITAOLL 

NFTHERWORLD 

RAM PARTS 

ROLLING THUNDER 

TENTH FRAME 

THE DEEP 

TOTAL ECLIPSE 



99/ 149 F 



SOLDES CASSETTES 
39 F 

4\4 OIT ROAD RACING 

ALBUM DIGITAL INTE 

AMERICA CL'P 

AMSTRAD GOLD HIT 1 

ARCADE FOOBALL 

BRUCE LEE 

BURBLER 

ECHELON 

FORCES MAGIQUES 

G AL VAN 

GUNSMOKL 

KILLEDUNT1L DEAD 

LED SI ROM 

NFTHERWORLD 

RAID 

SARACEN 

SI IACKLED 

STIFFIP 

THUNDERBLADE 

FIGER. ROAD 



PRINTEMPS ""----— 


J FORUM DES HALLES 


HAUSSMAN 


5, rue Pirouette 


64, bd Haussman 


Niveau -2 


Espace Loisirs sous-soi 


Métro et RER Les Halles 


75008 Paris 


Tél. 45.08.Ï5.78 


Métro Havre-Caumactin 




Tél. 42.82.58.36 


! 



Votre jeu chez vous dans 48 h* en téléphonant au 93.42.57.12 

^E^ojjejouj_m^ejejo_réç^iliorid_eh commarts porpaquei poste u-ss« (ATTtNTION. depuis Parti campoter le 16 93*2.57.11) 



BON de COMMA NDE EXPRESS à envoyer à MICROMANIA • B.P. 3 • 06740 CHATEAUNEUF 

TITRES PRIX 



:% logiciels AMSTRAD , ST, PC, A 



Participation aux trais de port et d'emballage 
Précisez cassette _^ Disk _ Total à payer = 



NOM 
ADRESSE 



^0 % 
+ 18 F 



PAYEZ PAR CARTE BLEUE / INTERBANCAIRE 



j)e d'expiration — I — Signal 

t>pUM jon a|cu'oni l»F| pour lra.1 de 

'. AMSTRAD 6128 SEGA C64 PC !512 . 



_ T.Shirt HIGH SCORE 

_ M. L XL M™r«™lr etq ill e ) 

_ Montre MICROMANIA 



dirait Yannick Noah) dont les différen- 
tes parties tourbillonnent devant vous 
avant de se rassembler. 
Cest là qu'est justement son point faible : 

un morceau particulier est vulnérable à 
vos attaques. 

11 suffit de s'acharner dessus pour faire 
sauter le bazar et récolter bonus ou ar- 
mes supplémentaires. 



Autre petite chose intéressante : vous trou- 
verez parfois sur le sol des pastilles rouge- 
orange. D'un tir vous pouvez les détruire, 
elles révéleront un nuage de gaz. 

En vous positionnant sur ce nuage vous 
récolterez une protection temporaire. Et 
s'il y a deux nuages présents à l'écran, le 
second se comportera comme une -smart- 
bomb" et aétruira tous les ennemis pré- 



sents sur l'écran (sauf l'hélicoptère à coup 

Enfin à la fin de chaque niveau, un des 
généraux vous attendra à bord d'un hé- 
licoptère ou d'un tank lourdement armé 
et blindé qu'il faudra toucher plusieurs 
fois avant de le détruire. 

Edité par : Virgin Carnes 

Prix indicatif : Non communiqué 



Et un shoot'em up de plus dans la collection du CPC. Parmi les défauts de Silk- 
worm on notera une animation cahotique, une difficulté désarmante et un scéna- 
rio archi-connu. En revanche les graphismes sont plutôt jolis, il est possible d'acti- 
ver un mode spécial permettant une animation plus rapide mais réduisant l'affi- 
chage à une ligne sur deux. 



OOOG di/io 



MICROLOGIC- B.P. 18-91211 DRAVEIL CEDEX 



itia.-iii»»B:fj;wjina 



Ide réel ou opérations L 
CB...) - Recherches 









iî: 

■M 


s^™™^™"* lia 

S»» — BÉP" ■SB 


1 

:Ci' ; 











DISQUETTE r pour CPC. 6I7.B ■ 7.4 S Kr. TTC 



rtgmg j jejl er - C hamps de types car actères I logiques I dates - 
masques d'édition entière n 
paramétrables, paJ 




sauvegarde sur disquette 



logiques d'exploita- 
sauvegarde - Tri sur 
cuei chaimp [traite 



^^^^^ D ISQUETTE 3- pou. CPC 617. B , 200 Fr> TTC 




■■auteur avec scrolling intégral et d 
coordonnées - PAS AUTOMATIQUE (2,54 ou 5.08 )OU MANUEL 

V^nmn TURBO : IM SOUKTTF. 3 1 pour CPC $128 : 715 Fr» TTC 



i performant - Analyse - Localisation de 
fichiers - Recherche/Remplacement de chaines. de codes, de mnémoniques 
280 - ASSEM8LEUR/DESASSEMBLEUR INTEQRE • Catcul et mise à jour de 
l'adresse réelle d'exécution des programmes - Formate et traite les disquettes 
aux formats DATA, SYSTEM. PCW, 20Bk, IBM PC (1 lace) - Analyse de 
disquettes non standard jusqu'à 1D secte u 'a,' piste ou avec des secteurs de 
256,1024,2048 ou 4096 octets... Transferts de fichiers entre différents formats. 
tt^ TJISOIJF.TTF. 3" pour tous CFC : 350 Va TTC 



BON DE CÔMMAN Ilf- 



Je choisi! de IBglcr [îar 
QCC«TRERBT HCHKQUF 
□CB. — 1 £p ! T □ MANDAT 

No de CB : 
Expire FIN : 



120 Frs 



règlement joint 
la commande - 50 Frs en Contra 
«nbt - Commande par téléphone accep- 

!<£=§& Téléphone: (1) 69.21.6l.f35 
UfSÏ Minitol :(1) 69.24.49.08 



4710 DATA 
4720 DATA l> 
4730 DATA 
4740 DATA 1' 
4750 DATA 
4760 DATA 81 
4770 DATA 
4780 DATA 
4790 DATA 
4BÛO DATA S. 
4810 DATA 
4820 DATA 
4830 DATA 
4840 DATA 
4850 DATA 5 
4860 DATA 
4870 DATA 
4B80 DATA 
4890 DATA 
4900 DATA 1 
4910 DATA 3 
4920 DATA 
4930 DATA C 
4940 DATA 
4950 DATA C 



02.47,00. 
01,00,00 
00.14.01. 
00,08.00. 
02. BE.OO, 
14,01,00, 
1C.01.14, 
00.00,06, 
02.8E.00. 
14,01,00, 
00.06.02. 
B3, 00.14, 
01.04.66. 
01,00.00, 
, OB.OO. 02 
83.00,14. 
,00.00,00 
,O0,02,8E 
,00,14.01 
,OO,0B.01 
.50,03, 
.02.02.flE, 
,08.01,00. 
,03,08.00, 
,02.77.00 



14.01.00,08,00, 
00,06. 02, 47, OC. 
00,08,01.00,00, 
02. 3F, 00, 14,01, 
14,01,04,10,01, 
OB, 01, 00,00,00, 
03.08, 00,02, 8E. 
02. BE. 00, 14,01. 
14. 01, OO.OB.Ol. 
08,00.02. BE, 00, 
83.00.14,01,04, 
01,00,ÛB,01,00, 
01. 14, 03, OB. 00, 
00,06, 02, B3. 00, 
,B3, 00. 14,01.00, 
01, 00. OB, 00.02, 
,06.02.8E.00.14, 
.00, 14. 01, 00. OB, 
,04, 3F, 01, 14,03. 
,00,00.00,06,02, 
, 00,02, BE, 00. 14. 
OO.U.Ol.OO.OB, 
,00.00,06,02,77 
,02.77.00,14.01. 
14. 01.04, 7B. 01 



02,47,00, 
14,01,00, 
00.02,02, 
OO.OB.Ol, 
14,03,0B, 
02.02.BE, 
00,14,01, 
Û4.1C.01, 
00.00,00, 
14,01,00, 
66,01,14. 
00,00,02, 
02.B3.00. 
14,01,04, 
OB.01,00 
9F, 00, 14. 
01,04.3F 
01. 00,00, 
OB.00.02, 
SE, 00, 14, 
.Ol.OO.OB. 
OO,02,8E 
.00,14.01 
00.08,01 
,U,03,0B 



14.01,0C9 
OB,00,07B 
5O,O0,OBE 
00,00,082 
0O.02.0F0 
00,14,155 
00.08.0F4 
50,03.120 
02.02,000 
0B.01.15F 
03,08. 15D 
02,83, 18D 
14.01. 16C 
66.01,147 
,00,00,134 
01,00. 1BD 
,01,14,10F 
,00,02,001 
.8E.00.19B 
01,04,0D0 
,01,00.14F 
00,14,156 
04.7B.120 
,ÛO,OO.OSD 
00.02,134 



4960 DATA 77,00. 
4970 DATA 01,04, 
4980 DATA 01,00, 
4990 DATA 00.14, 
5000 DATA 04, 1C, 
5010 DATA 00,00, 
5020 DATA 00,02, 
5030 DATA 00.14, 
5040 DATA 00, OB, 
5050 DATA 02. 8E, 
5060 DATA 14.01, 
5070 DATA 0B.01, 
5060 DATA 03, OB, 
509O DATA 02,77, 
5100 DATA 14.01, 
5110 DATA OB.OO, 
5120 DATA BE.OO, 
5130 DATA 00.00, 
5140 DATA 14,01, 
5150 DATA OB.OO, 
5160 DATA 9F, 00, 
5170 DATA 10,01 
51B0 DATA 01,1C. 
5190 DATA OF.01 
5200 DATA 01,0F 



14,01,00,08, 
7B. 01. 50, 03 
00,00.02,02. 
01, OO.OB.Ol 
01, 14, 03. OB. 
00, 02, 02. 6A, 
64,00,14,01, 
01,04.10,01, 
01,00,00,00, 
00.14,01.00, 
04. 7B. 01, 14, 
00.00.00,02. 
00,02,77,00, 
00.14.01,04. 
OO.OB.Ol. 00, 
02. 7F. 00, 14. 
14, Ol.OO.OB, 
00,02, 02. 8E. 
1,01,00, 
02.8E.00.14 
14,01.00,08, 
14, 01.02.BE 
01,14,01,02. 
10,01. 14.01 
00,00,00,00 



01,00.00. 
OB, 00.02. 
77,00,14. 
00,00,00, 
00.02,64, 
00.14,01, 
OO.OB.Ol. 
50.03.0B, 
02,02,64, 
OB,01,ÛO, 
03.OB.00, 
02,77,00, 
14,01,00, 
76,01,50, 
00.00.02, 
01.00,08. 
00.02.BE, 
.00,14,01. 
00.00,06, 
Ol.OO.OB. 
00.02,7F, 
,00.14,01 
BE.OO, 14. 
.02. BE.OO 
00.00.00: 



1,06,02, 
77,00,14 
Ol.OO.OB. 
06.02.6A, 
00,14,01, 
04,10,01. 
00.00.00. 
00.Û2.6A, 
00,14.01, 
00,00,06, 
02,77,00, 
14,01,04, 
OB, 01,00, 
03. 08. 00. 
02.77,00, 
01,00.00, 
00,14,01, 
00.08.00. 
02, BE.OO, 
01.00,00. 
00,14,01, 
04,47,00 
01,04,47, 
,14.01,04 
00.00.00. 



77.00.14, 12B 
Ol.OO.OB, 176 
00,02,77,115 
O0.14.0l.OA6 
OO.OB.Ol, 000 
14,03,0B.0C6 
06.02.6A.OFF 
00,14,01,115 
00, OB, 00,094 
02,77,00.130 
14.01,00,145 
78,01,14,130 
00. 00.06, OAE 
02.77,00. 1E5 
14,01,00.081 
00,06,02,ÛB5 
OO.OB.Ol, 1SF 
02. 8E. 00, 142 
U.Ol.OO.OCC 
00.02,02,000 
OO.OB.Ol, 161 
.14, 01,0F, 146 
00.14,01.138 
,47,00.14.146 
00.00,00,010 




NOUVEAU 
POUR CPC 



LECTEUR 5" 1/4 

POUR 

CPC454 • CPC664 • CPC6128 

i.r? awr disquette utilitaire ie lormattage 

Stocker 800K octets S Doubler la capacité du DIRectory 
Lecteur 80pistes, DFDD, 96tpi . . . 

Accédez à toute la bibliothèque CP/Méditée sur 5" 1/4 
grâce aux utilitaires disponibles chez « WILD WEST » 



NOUVEAU 
POUR CPC 



LE PLUS PERFORMANT 

DU MARCHE 

[LECTEUR NEC] 

SEC 



8«*- 



BON DE COMMANDE «WILD WEST», W7W st Martin de * Braque. Tél. : 90.77.6i.3e 



NOM : 

PRENOM : 

ADRESSE : 

VILLE : 

CODE POSTAL : 






DE DOCUMENTATION 



•Lecteur 1B4O,O0f 

•Cable 6128 664 155, 00 r 
•Transfo 12 volts 120, 00 F 



■.^^■re. 2.20 F i. 



sec 



99. 77. 64. 94 - 24/24 Minitel 



g^Slfe5iSB*3 25 



SM§Ê$^ 



1130 DATA 00, 15. 00,44, 38, 34, 98. 00, 2A. 00. 00,44, 00, 64. 60, 27F 
1140 DATA 90. 98, 00. 88, M, 00. 10. 10, CC, CÛ.CO.CC, 20. 20,00,528 
1150 DATA 00. 40, 64. 6E.90, 60, 90,98,80, 00, 00, 10, 90.6E, 64,538 
1160 DATA 9e.9D.6E.20.00.0Q,64.SD.6C.3A,35,9C,AE,98,00,541 
1170 DATA QO,3F,BE.E2,64,98,Dl,7D,3F,O0,00,3C,F3.B2.C8,7U 
1180 DATA C4.71,F3,3C.00.O0.C0.C0.C0.8O.4O,C0.C0,C0.00.7A4 
1190 DATA 00, 10, 10.9D.28. 14, 6E.2O.20. 00.00.44. 10, 90,28, 2C0 
1200 DATA 14.6E,20.88,00.00,00.40.CO,80,40,C0.80.00,00.42A 
1210 DATA OO.0O,AF,F2,QA,05,Ft.5F,Û0,O0.QO.00,AF,Fl,QA.4AA 
1220 DATA 05, F2. 5F. 00.00, 00. 00. 84,0F, 08, 04,0F, 48, 00,00, 24C 
1230 DATA 00. 00, 05. OC. AA, 55, OC, EA, 00, 00. 00.00, 40, FF, 60,495 
1240 DATA 40, FF. 80, 00.00, 00, 28, 00, 00,44, 00, 00,00, 51. SI, 2CD 
1250 DATA OO.SA.OA.OD. 08, 04. 00.55, 00,55. 00,55, 00. 00.00.17C 
1260 DATA 00.00,00.00.00,00,00.00.00.00.00.00.00.00,00,000 
1270 DATA 00.00.00,00,00.00.00,00,00,00.00,00,00.00,00,000 
1280 DATA 00.00,00.00.00,00.00.00.00,00,00,00,00,00,00.000 
1290 DATA 0O.O0,OO,O0,00.40.£A.OO,0O.OO.OO.0O,D5.SD.80,2DC 
1300 DATA 00,0O.OO.U0.64,ÛE,8O,u0.00,OU.OO,AF,A5,AA,WJ.Jll J 
1310 DATA 00.00,OO.FA,F2,AA,OQ,00,00.1Û,CC.3E,B2,00,00,462 
1320 DATA 00, 00, 30, 30, 20. 00,00. 9D, 79, U.3E,D1,3D, 68,64,492 
1330 DATA 3£.90.30,94,6E,20,10.9D.C4.3E.95,98,00.00.64.560 
1340 DATA 90. 30. C4. 20.00. 00, 10. 9C.B6, 88.00, 00,10, 10, 9D.44B 
1350 DATA 3D,98,10.00,44,1Q.64,6E,30.44.00,15,10.98.90,3CC 
1360 DATA 98, 15, 00.14, 30. 6A.C0.3A. 34. 00.51. 98,68. CO. 38, 4D2 
1370 DATA D9.00, 14.30,82,90.82.34.00, 15,00.09, 79.88, 15.549 
1380 DATA 00, 44, 00.64. 6E, 20,44, 00.10. 00, 10,90.00. 10.00.23A 
1390 DATA 00.00,00.00.00,00.00,00,00.00,00.00.00.00.00,000 
1400 DATA 00.00.00,00,00.00.00.00.00,00,00,00.00,00,00,000 
1410 DATA 00,00,00,00.00,00,00,00,00,00.00,00.00,00.00,000 
1420 DATA 00,00. 00. 00,00,00,40.00. 00, 00, 00,00, 00,D5,5D, 232 
1430 DATA 80.00.00.00.00,AE.OE.AA,00.00.00,00,FA,F2.AA,47C 
1440 DATA 00.00.00, 10.CC, 3E.B2.00, 00, 00. 00,30, 30, 20, 00. 24C 
1450 DATA 00,9D.79.a.3E,D1.3D,88.64,3£.90,30.94,6E.20.632 
1460 DATA 10.9D.C4.3E,95,98,00,00,64.90,30,C4,20.00.00.4E4 
1470 DATA 10.9C.B6.98,00,00.10,10.9D,3D,98.10,00.44.10.3FO 
1480 DATA 64. 6E, 30, 44. 00, 15, 10.96, 90, 96, 15, 00, 14, 30, 6A.3EE 
1490 DATA CQ,3A,34,Q0.5l,98,68.CQ.38,D9.00,i4,30,B2.90.5D6 
1500 DATA B2.34,00,15.40,D9,79,C6.1S,00,44 I 4Û,64,6E,60,520 
1510 DATA 44,00.10.00,10.90,00,10,00,00.00,00,1)0,00,00.104 
1520 DATA 00,00. 00. 00. 00.00, 00.00, 00,00. 00,00. 00, 00. 00.000 
1530 DATA 00.00.00,00,00,00,00.00.00,00,00.00.00,00.00.000 
1540 DATA 00. 00.00,00,00, 00.00. D5.EA, 40. FF, 80.00, 40, AH. 46C 
1550 DATA 5D.55.ÛC,EA.OO,40.OD.0E.O4,OF.48,0O,55,SA,A7,3B4 
1560 DATA O5.F2,5F.0O,55,5B.A5.05.Fl,5F.OO,O0,40.C0,4O,540 
1570 DATA C0,ÛO.OO,0O.01,F9.Dl.A9,O0,OO.54,01,F9.Dl,A9,5FC 
1580 DATA 54.00,01,5A,Ë2,42,F2,OB.OÛ,01.BS.Fi,F9,A5.81,666 
1590 DATA Q0,01,C0.5A,52,4A.81,0O,85,4A. 03. A9, 42,0F, 60,484 
1600 DATA 5A.A5.FC.S6.AD.F0,0A.F1.F2.03,81,52,F3.A0.5A.89E 
1610 DATA A5,42,C0.07,FO.0A.65.0B.CO,C0,61.OF.8O.01.ei.64A 
1620 DATA E8.C0.A9.81,O0,01,40,56,FC,42,Ol,OO.S4.OO.81,57Û 
1630 DATA 03.80, 54. 00.00. 00.01. A9. 00. 00, 00. 00, 00, 01. 01. 183 
1640 DATA 00,00,00,00.00.00.00.00.00,00.00,00,00.00.00,000 
1650 DATA 00.00.00.00,00.00,00,00.00.00.00,00,00.00.00,000 
1660 DATA 00,00.00.00,00.00.00.00,00,00,00.00.00,00.00.000 
1670 DATA 00.40, 60, OO.CÛ. 00,00, 00. DS.EA, 40, FF. BO, 00,00. 4FE 
1680 DATA AE,5D,55,OC.AA,00,00,OD.OE,04.0F,08,00.00.5B,2A7 
1690 DATA A5, 05, F2.0A.Q0, 00. C0,CO.4O,C0, 80.00.00, 01, F9.5A0 
1700 DATA S1.A9,00.00.54,01,F9.S1.A9,54,00,Q1,5A.E2.42,515 



^^;...:--^gg^&;--^-. ' 




collection 



orthogus TOME 



ORD SUJET* VERBE 

as gérerai da raccord Ou v 

b sujet «t (QUI) 



HfraPhex CADET 6è/5è 



PREMIERS PAS (I 



ABOLISSONS 

LES 
PRIVILEGES 



REVISIONS VACANCES 

à prix démocratique 




MATHEX 

CADET 6s/5è ou 
JUNIOR 4è/3è 




CONTINUE 
EN AOUT* 




Élii|i| fli-M 



tu^ 



s yiOV 



Ne vous est-il jamais 
venu à l'idée de vouloir 
convertir un dessin d'un 

mode dans un autre ? 

C'est certes possible avec 

certains programmes de 

dessin, mais le résultat 

est décevant car le 

programme se contente 

de faire des pixels 

plus grands ! 



10 HGDE 2;PEINT "TRANSHÛD - CHARGEUR • 

20 «FHOSY li9FPF.L=100 

30 FOR |;«000 TO «216 STEP 8 

40 SOMMhFQR J TO 7 

50 fiEAD MîA*WU , S"f*IJ:PBK IO.A;S0M=! 

60 MEXT J 

70 8EAD AIiA^AU'ftAlhlF AOS0H THEN I 

;L;EHD ELSE PRINT "Ll GHE" ; L; "0t(. ' 

60 L LH0:MEIT I 

90 SAVE ■TRAAS'.B, «000, 1211 

100 DATA 00 1 04.04,54.O8,OC.0C.5C.O08 

110 DATA 06,0C,0C.bC,A6.AC,AC,FC,378 

120 DATA 40. 44. 50, 01. 48, 4C, 58.09, ICA 

130 DATA 48,4C.S8,09.EB,EC.F8,A9.46A 

140 DATA 4Q,50,44,OI.46.58.4C,09.1CA 

ISO DATA *8,S8.*C,09.Efi.F8,EC.A9,46A 

160 DATA 10.14, 14.41. 18, 1C, LC.49, 112 

170 DATA 16.IC.IC,49,B8,BC,BC,E9,3B2 

180 DATA 80,84, 84, Ù*,Ô6,8C,8C.DC, 408 




Volable pour 
m CPC 464 
18 CPC 664 
m CPC 6128 



C'est pourquoi j'ai mis au point 
Transmod. Il permet de con- 
vertir le mode 2 en mode 1 , 
et le mode 1 en mode O, Mais dans 
le nouveau mode les pixels sont 2 fois 
plus grands que dans l'ancien, donc 
il contient 2 pixels de l'ancien mode. 
Pour résoudre ce problème, le pro- 
gramme s'occupe de calculer les 
couleurs Intermédiaires. 



FONCTIONNEMENT 
DU PROGRAMME 

• Choix du mode 

- mode 2 vers mode 1 ou 

- mode 1 vers mode 

• Catalogue, puis demande du nom 
de l'Image. 

- S'il s'agit dune mauvaise disquette, 
on tape (RETURN) directement. 

• Demande des couleurs. 

• Conversion de l'image dans le mode 
choisi, 

• Affichage des nouvelles couleurs. 

• Demande sauvegarde nouvelle 
image. 

• Demande conversion autre image. 



INT 'ERREUR LIGNE" 



190 DATA 
200 DATA 
210 DATA 
220 DATA 
230 DATA 
240 DATA 
250 DATA 
260 DATA 
270 DATA 
260 DATA 
290 DATA 



A0.A4.A4, 
CO,C4,00. 
E0,E«,F0, 
C0,DO,C4. 
EÛ.F0.E4, 
90,94,94. 
B0,B4.B4, 
80,64.84, 
66.8C6C, 
C0,C4,D0, 
C8.CCD6, 



F4, 02,06 
81, C8, CC 
Al, 42, 46 



06.S6.340 
08,89, SCA 
52,03,432 



i.CB.D6,CC,89,5CA 



Al, 42.52, 
C1.98.9C, 
El, 12, 16, 
D4.A0.A4, 
DC.02,06, 
61.E0.E4, 
89,42,46, 



46,03,432 
9C.C9.512 
16.43.37A 
A4.F4.S38 
06.56. 2E0 
F0.A1.62A 
52.03.302 



Olivier BRUNET 



300 DATA CÛ. 
310 DATA C8, 
320 DATA 90 
330 DATA 9H, 
340 DATA 20 
350 DATA 28. 
360 DATA 60 
370 DATA 68. 
380 OATA 60. 
390 DATA 68, 
400 DATA 30. 



D0,C4,81,E0. 
DB.CC.89,42, 
94, 94, Cl. B0 
UC&C.CM.fct 
24,24,74,26 
2C2C.7C, 82. 
64,70,21,68 
6C.78.29.C2. 
70.64,21,68. 
76,6C,29,C2, 
34.34,61.36. 



F0.E4.At.62A 
52, 46,03, 3D2 
84, B4, El. 572 
lb,lb,4d,JlA 
2C.2C.7C, £DB 
86, 86, D6, 360 
6C,78,29.2CA 
C6.D2,83,452 
78,6C,29,2CA 
D2,C6,83,452 
3C.3C.69, 212 



^8 



410 DATA 38,3C,3C,69,92,96.96,C3,39A l S90 DATA AO.BO.BO, Al, 82, 92,92,83, 4CA 

420 DATA 00, 10, 10,01, 20, 30, 30, 21, 0C2 | 600 DATA CO,DO,00,C1,EO,FO.FO.E1.6C2 

430 DATA 20.30,30,21,02. 12,12. 03. OCA GiO DATA ÊO,FO.FO,E1.C2,D2.D2,C3,6CA 

440 DATA 40.50.50.41,60. 70,70,61,202 fi 2 DATA C0.DO.DO.C1.EO.FO.F0.E1.6C2 

450 DATA 60. 70, 70. 61, 42,52, 52,43. 2CA 630 DATA EO.F0.FO,El,C2,D2,D2.C3.6CA 

460 DATA 40,50,50.41,60,70,70,61,202 640 DATA 84,94.94, B5.A4.84.B4.A5.4E2 

470 DATA 60, 70, 70, 61,42,52, 52,43, 2CA 650 DATA A4,B4,B4,A5,86.96,96.87,4EA 

480 DATA 04, 14, 14, 05, 24, 34,34, 25, 0E2 660 DATA 08,18,16,09.28,38.38,29.102 

490 DATA 24,34,34,25,06, 16, 16,07, OEA 670 DATA 26.38, 38,29,OA,1A,1A,OB.10A 

500 DATA 80.90,90,6l,AO,BO,BO,A1.4C2 680 DATA 48,58,58,49,68.78.76,69,302 

510 DATA A0,BO,BO,Al,82,92,92,B3,4CA 690 DATA 6e,76,78,69,4A,5A,5A,4B,3ÛA 

520 DATA CO,DO,D0.Cl,E0,FO,FO,El,6C2 700 DATA 48,58.58,49,68.78,78.69,302 

530 DATA E0,FO.FO,El.C2,D2,D2,C3.6CA 710 DATA 68,78,78,69,4A,5A.5A,4B,30A 

540 DATA CO,DO.DO,C1,EÛ.FO.FO,E1,6C2 ! 720 DATA OC. 1C,1C,0D.2C.3C,3C.2D, 122 

550 DATA E0,F0,F0,E1,C2,D2,D2.C3,6CA 730 DATA 2C,3C,3C,2D,0E, lE.lE.ÛF, 12A 

560 DATA 84.94,94. 85, A4, B4.B4.A5.4E2 740 DATA 21.00,C0,01,00.A0.7E,4F,24F 

570 DATA A4,B4,B4.A5.86,96.96,B7.4EA 750 DATA 0A,77.23,3E.O0,BC.2O,F6,2B4 

590 DATA 80,9O,9O.81,AÛ,B0,B0,Al,4C2 760 DATA C9,OO,OO.0O,00.0O.0O,00,0C9 



GAGNER AU LOTO 



LOTO - MATIC 



qui 



pour: 
■facilement les n 
plus de chance de sortir 

• établir scientifiquement 

les grilles les plus performantes 

grâce aux tests du Lotoscope 

• contrôler sans peine 

les résultats de vos jeux 

Editions écran et imprimante 

Documentation détaillée 

+ CADEAU contre 4 timbres 

INFORMATIC Applications 

B.P. 78 -67800 BISCHHEIM 

Tel 88.33.58.85 



' AND 540'N" THEN 400 



30 '< TRANSHOD 

40 ' < 

50 ' « OLIVIER BRUNET 19Ê 

60 ' « 

70 ' iiHiiimiiitiiiiimiiiiHiii 

B0 HEH0RY t9FFF:L0AD "TRANSVkAOOO 

90 'mHIIIIHIHHII.M.HimHH» 

100 '• TRANSHOD BOUCLE PRINCIPALE • 
110 l iiHi.imiiiii..ii!Him.iiiii 
120 H0DE 1:IHK O.OtINX 1,18:B0BDEE 0: IHK 2,6 

130 L0CATE 16,2:PSINT "TRANSHOD" 

140 LDCATE 1,4:PHIHT "par 0. Brunet" 

150 PEN 2:L0CATE 10,10:PB1HT '1. Mode 2 «ers Mode 1" 

160 LOCATE 10,12:PRINT "2. Mode 1 vers Mode 0* 

170 LOCATE 10.15.-PRIHT "VOTRE CHOIX :"; 

180 AI=UPPERI(INKEY*):IF AIO'1" AND Ai<>"2" THEN 180 

190 PRIKT A»; 

200 HODE 2: PEN 1 

210 CAT 

220 INPlfT 'Noi de l'iiaie a chaner iVHW 

230 IF IHA*=" THEH 200 

240 IF L£N(At)>l2 THEN 200 

250 LÛCATE 1 . 20 : 1 NPUT 'Couleur (Font. 

260 LOCATE t, 21 : INPUT "Couleur 1 

"1" THEN C0L=2:GQTQ 290 

270 LOCATE 1,22: INPUT "Couleur 2 

2BO LOCATE 1,23: INPUT "Couleur 3 

290 FOR 1=0 TO COL-1 

300 JU*i> = INTMHU>/9) 

310 RU + l) = lNT(<IN<l)-JUM)i9>/3) 

320 B(l + l) = ]NT((IN<h-B(Hl)i3-J(l + n«! 

330 IHK I.INII) 

340 NEIT 

350 IF A»="l" THEH MODE 2 ELSE HODE 1 

360 CALL f.BC06,tCÛ:LOAD IHAI.tCOOO 

370 CALL tBBIB 

m CALL S,BCO6,U0:r»DE 1 



,ih(0) ; 

.INID.'IF u- ) 



.IN12) 
,IN(3);C0L=4 



390 PEN 1:P»INT 'C'EST BON ?"; 
400 SI=UPPEB»IINKEÏI)!lF S*<>"{ 

410 IF S*="N" THEN GOTO 200 >Tï 

420 IF A»="l" THEN HODE 1:P0KE &A205.4A1 ELSE HODE 0:P0 >JP 
KE U205.I.A0 

430 CALL lBC06,fcC0 >LU 

440 CALL 1A20G >JH 

450 ON VAL(AI) GDSUB 590,630 )¥U 

460 CALL &BB18 >HF 

470 CALL 4BC06.W0 >LG 

480 HODE 2 >JB 

490 INK l,0:INK 0,26 >HU 

500 IF Al="l" THEN FOR 1=0 TO 2:PRI«T USING "INK I :";l >UH 
;:PRINT IKll):NFJT 

510 IF A«="2" THEN FOR 1=0 Tû 9:PfilNT USING "INK II :"; >IB 
IliPRINT IKIIkHEXT 

520 PR1NT m 

530 PRIHT "SAUVEGARDE DE L'ECRAN :"; >Ffi 

540 At=UPPER»UHKEYtl:IF A»O"0" AND AiO'H" THEN 540 E >KL 
LSE PRINT Aï 

550 IF A»="0" THEN IHPUT "NOM :"{AI:SAVE A$,B,&C0O0,U >ZU 
000 

^60 PRIHT "AUTRE IHAGE :'; >CP 

570 A»=UPPEfi*t LHKEY») :1F AIO"0" AND AIO'N" THEN 570 E >H 
LSE PRIHT At 

580 IF A*="0" THEN CALL IBB18:GOTO 120 ELSE END >HI 

590 C0L=INT<(H(l)»Bf2lJ/2MINTUr(mr<2H/2)t3«INT<(J< >NH 
l)tj<2h/2)t9 

600 IK{O)=lN(0):IK(l)=C0L:IK(2)=l»(l) >EV 

610 FOR 1=0 TO 2; INK l,IK(l):NEÏT >AN 

620 RETURN >ZD 

630 RESTORE 690:FOR ENC=0 TO 9 >ïï 

640 READ 11,12:11=11*1:12=12+1 )XZ 

650 C0L=INTHB(ll)tB(l2))/2)*iNTl(r(lt)tr(l2))/2)i3*INT >ÏU 
UJII1)*J<I2))/2J"9 

660 IK(ENC)=C0L:IHK ENC,CÛL >IA 

670 HEXT ENC >GF 

680 RETURN >ZK 

690 DATA 0,0,0.1.0,2,0.3,1,1,1.2,1,3.2.2,2,3.3,3 >HH 

29 



RESULTATS CONCOURS 3D POOL 
AMSTAR & CPC 33 
BRITISH TELECOM 



QUESTIONS 


REPONSES 


1 - Combien de trous y a-t-il sur 
un billard ? 


6 


2 -Quand vous faites tomber la 
boule blanche dans un trou, où 
pouvez-vous la mettre sur la table 
pour continuer le jeu ? 


A l'intérieur du "D" 


3 - Au début du jeu, combien y a- 
t-il de boules sur la table ? 


16 


4 - Que se passc-t-il si vous faites 
tomber dans les trous la bille noire 
et la bille blanche en même temps ? 


Vous perdez 


5 - Donnez le nom du champion 
européen actuel de billard. 


Maltese Joe Barber 




Gagne 4 logiciels + 1 T-shirt + 3 af- 
fiches : Paul NICOLAS -91390 

MORSANG-SUR-ORGE. 

Gagne 1 logiciel + 1 T-shirt + 3 af- 
fiches : Stéphane BONDU -44700 
ORVAULT. 

Gagne 1 logiciel + 1 T-shirt + 3 affi- 
ches : Sébastien VAN-DEN-BROU- 

CKE - 35160 St Jacques Aéroport. 



BULLETIN D'ABONNEMENT 




1 1 NUMEROS 210 F 



Code postal : 
Date : 



Signature 



Merci d'écrire en majuscules. 

Bulletin à retourner à l'ordre de Editions SORACOM. 



Pour les étrangers le règlement se 
fait soit : 

• par eurochèque (numéro de carte ins- 
crit au dos) 

• par mandat international 

- par virement CCP 794 1 7 V Rennes 

Ci-joint un chèque libellé à l'ordre de : 

Editions SORACOM 

La Haie de Pan 

35170 BRUZ 



PROGRAMMEURS, GRAPHISTES, 

rejoignez la meilleure équipe et participez à de très granc 




phistès^^- ^ 

Créatior* 

A ' 



CRAZY CARS 2 

• JOYSTICK D'OR CANNEf 



TITAN 

• PRIX DE LA REDACTION 
AMSTRAD 100 % 1989 

• PRIX DE L'INNOVATION 
CEI CHICAGO 1989 

(Consumer Electronics Industry) 



TITUS, une équipe d'enfer !!! 



TITUS 



Paris - Londres - Los Angeles 



TITUS Recrutement 

28 ter Avenue de Versailles 

93220 GAGNY 



Tél. : (1)43 32 10 92 
Contact : Hervé 



SOLUTION 



LE MANOIR DE MORTEVIELLE 




La première aventure publiée par 
Lankhor semble avoir déchaîné 
les passions. Vous avez été nombreux 
à nous demander la solution de ce jeu. 
Aussi, voici une solution directe pour 
connaître enfin le fin mot de l'histoire ! 

- ALLER DANS LE COULOIR 

- ALLER DANS LA CHAMBRE 
DE BOB {2ème porte à droite 
en partant de la fenêtre) 

- OUVRIR LA MALLETTE 
AU-DESSUS DE L'ARMOIRE 

- FOUILLER LA MALLETTE 

- PRENDRE LE POIGNARD 
-SORTIR 

- ALLER DANS LA CHAMBRE DE 
GUY ET D'EVA (Ire à gauche) 






- OUVRIR LA MALLETTE 
SUR L'ARMOIRE 

- FOUILLER LA MALLETTE 

- PRENDRE LA BAGUE 
SURMONTEE D'UNE CROIX 

-SORTIR 
-ALLERALACAVE 

- METTRE LE POIGNARD 
DANS LA FENTE NOIRE 
JUSTE AU-DESSUS DU SOLEIL 
DU PILIER AU MILIEU 

- EMPRUNTER LE PASSAGE 
SECRET 

• REPONDRE AUX 10 

QUESTIONS : 

1 - NATURELLEMENT 

2 -AUTRE 

3 - RECHERCHES HISTORIQUES 

4 -SALLE A MANGER 

5 -UN PARCHEMIN 

6-3 

7-10 

8 - MURIELLE 

9-GUY 

10-LEO 

- PRENDRE LA BAGUE EN OR 
AVEC LA CROIX 

- METTRE LA BAGUE SUR LE 
TROU EN HAUT DELA BOULE 

- TOURNER LA BAGUE 

- ENTRER DANS LA CRYPTE 

- FOUILLER LA MAIN QUI TIENT 
LA LANCE 

- PRENDRE L'OBJET EN BOIS 
-SORTIR 

- REPRENDRE LA BAGUE 
SUR LA BOULE 

-SORTIR 

- ALLER DANS LE GRENIER 
{à droite de la fenêtre, dans le 
couloir) 

- OUVRIR LE TIROIR DU HAUT 
DE LA COMMODE 

- FOUILLER LE TIROIR 

- PRENDRE LA BAGUETTE 

- METTRE L OBJET EN BOIS EN 1 

- METTRE LA BAGUETTE EN 2 

- TOURNER SUR LA BAGUETTE 
-LIRE LE LIVRE... 

Et vous saurez tous les détails de l'his- 
toire ! 





/ 
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Tiroir du haut 


/ 
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Helpbasicet Helpbase* 


Transform 


n°3ï 


Physique ■ chimie 6è 


V.T.A 


n"3* 


Hercules and Ihe Damned 


Gremlin 


n°26 


Préparation à la 2nde 


Hatier 


n°31 


Heroesof the lance 


US Cold 


n"29 


Purple Satum Day 


Ere Informatique 


n"33 


High Epidemy 


Fil 


n°26 








Highway Patrol 


Microlds 


n° 30-32 








Holocauste 


M.B.C, 


n°32 


Rambo III 


Océan 


n" 27-30 


Hot Shot 


Addictive 


n°26 


Rastan 


Imagine 


n°27 


Human Killing Machine 
Humanoïd 


US Cold 


n°32 


Renegade ni 


Imagine 


n°34 


B.E.P. 


n°29 


Retumof thejedi 


Domark 


n°28 








Réussir Conjugaison 
Réussir Mathématiques 


Logiciel 44 
Logiciel 44 


n°28 








n°34 


Imprim'image* 


Esat 


n°28 


Réussir Vocabulaire CM 


Logiciel 44 


n°33 


Ingrid's back I 


Levé.] 9 


n°30 


Rex 


Martech 


n°30 


International Soccer 


Audiogenic Software 


n°34 


Road Blasters 


US Cold 


n°26 


Iron Trackers 


Microids 


n a 34 


Robocop 


Océan 


n° 30-31 


Iss 


Electric Dreams 


n"31 


Roy of the Rovers 


Cremlin 


n'29 








R-Typ« 

Run the Cauntlet 


Electric Dreams 


n^29 








n°33 


J'apprends à écrire 


Cedic Nathan 


n°31 








l'apprends à lire 


'". eebe Nathan 


n 29 








J'apprends lc9 nombres 


Cedic Nathan 


n°29 


Salamander 


Imagine 


n°27 


Jaws 


M.B.C. 


n°32 


Sa murai Warrior 


Firebird 


n°26 


Jinks 


Co! 


n°32 


Savage 


Firebird 


n° 28-31 








SDI 

Secret Défense 


A division 
Loriciels 


n°31 








n"29 


Karaté Ace 


Gremlin 


n D 27 


Skatcball 


Ubi Soft 


n°33 








Skweek 
Skyx 


Loriciels 

Legend Software 


n"34 


La dernière mission 


M.B.C. 


= 28 


n" 29-31 


Lancelot 


Mandarin 


n°28 


Sphaira 


Ubi Soft 


n°33 


Last Duel 

Leader Board Par3 


US Cold 


n"33 


Spitting Image 
Star-Trap 


Domark 
Loriciels 


n°30 
n°33 


L.E.D. Storm 

L'empire contre -attaque 

Le Maître absolu 


Capcom 
Domark 
Ubi Soft 


n°32 
n°26 
n°33 


Street Sports Basket bail 
Supersports 


Tyne Soft 
Gremlin 


n°26 
n°32 

n D 27 


Le Manoir de Mortevielle 

L'île 

Les Aventuriers 


Lankhor 

Ubi Soft 
lnfogrames 


n° 30-31 

n°28 
n D 31 


Supcrtrux 

Stunt Bîke Simulator 

Sword Player 


Elire 

Silverbird 


n°34 
n"31 

n°27 


Les mille et un voyages 


Carra/ Editions 


n°31 














Techno-Cop 

The Arcon Collection 


Cremlin 
Electronic Arts 


n°29 








n°30 


Mad Mix 
Mar sport 


US Gold 
Rebound Hewson 


n°28 
n c 26 


The Deep 
The Eidolon 


US Gold 
Mastertronic 


n s 33 
n"27 


Mata-Hari 

Mathématiques 6i/5t 

Mathex 

Mathet Benjamin 

Maths 

Maths succès 6è 


Loriciels 
Nathan 
V.T.A. 
V.T.A. 

Cedic Nathan 
Cedic Nathan 


n°26 
n°30 

n°30 
n°32 

n c 29 

n°32 


The Games 

The Games Summer Edition 

The Jungle Book 

The Munsters 

The Paranoïa Complex 
The Real Ghostbusters 


Epyx 

Coktel Vision 
Again Again 
Magic Bytes 
Acti vision 


n Q 27 

n°34 

n°30 

n°33 

n° 28-33 
n°34 


Math-Util 


Esat 


n°29 


The Train 


Electronic Arts 


n=27 


Maxi-Bourse 


Cobra 


n c 26 


Thunder Blade 


US Gold 


n c 29 


Memory* 
Metaplex 
Meurtres à Venise 
Mike and Moko 
Monte Cristo 
Motor Massacre 


Esat 

Addictive 

M.B.C. 

Cedic Nathan 
Gremlin 


n°29 
n°26 
n s 26 

n°29 
n=29 
n°30 


Tiger Road 
Titan 
Top Level 

Total Eclipse 
Total Eclipse II 
Transmuter 
Trivial Pursuit II 


GO! 
Titus 

M.B.C. 

Incentive Software 
Incentive Software 
Code M as ter 
Ubi Soft 


n"29 

n" 28-31 

n°32 

n" 27-29-31 

n D 34 

n°28 










Navy Moves 


Dinamic 


n°34 


Typhoon 


Imagine 


n=29 


Nemesis Express* 


Duchet Computer 


n°31 














Netherworld 


Hewson 


n°29 


Victory Road 

Vie et mort des dinosaures 


Imagine 


n°29 








n°26 


Oblitéra tor 


Melbourne House 


n°34 


Vindicator 


Imagine 


n°26 


Off Shore Warrior 


Titus 


n°27 


Vindicators 


Tengen 


n°33 


Omeyad 


Ubi Soft 


n°33 


Vivre et laisser mourir 


Domark 


n°28 


On the Run 
Opération Hormuz 


Silverblrd 
Again Again 


n°26 
n°32 








Wanderer3D 


Elite 


n°32 


Opération Wolf 


Océan 


n° 29-31 


WarinMiddleEarth 


Melbourne 


n°30 


Orthogus 


V.T.A. 


n"34 


Wec le Mans 
Wizard's Uû- 
Wizard warz 


Imagine 
Blue Ribbon 
GO! 


n°31 
n°27 
n°27 


Pac-Land 


Grandslam 


n°32 


Pacmania 


Grandslam 


n°28 














Peter Beardsley's International 


Grandslam 


n°26 


Zenith 2* 


Esat 


n°29 


Peter Pan 


Coktel Vision 


n"29 


* Utilitaire 







ARTICLES ET PROGRAMMES 
AMSTAR & CPC N°26à34 









DIVERS 


N°34: Couleurs 
Satanas 


P. 26 
P. 39 


N° 26 : Les nouvelles machines Amstrad 


P. 8 


Compacteur 

Caractères 

Anti-erreurs 


P. 75 
P. 80 
P. 84 


PC Show de Londres 


P. 10 


Conseils : bien saisir un listing 


F. 72 


Disquette système au format data 


P. 87 


Cobra soft : vous avez dit passion ? 


P. 108 






N° 27 : Festival de la micro 1988 
Dossier : les fanzines 
Téléchargement 

N"28: Amstrad Expo 


P. 4 
P. 95 
F. 82 

P. 7 




CALAMITES 












N°29: La revanche du retour des fanzines 


P. 38 


N"30: Erratum article Vidéo N° 29 


P. 86 1 


N° 30 : Téléchargement 

Le fils du fanzine 
N° 31 ; Fanzines & Qe 


P. 19 
P. 67 
P. 18 








BIDOUILLE 






Téléchargem ent 
N s 32 : Fanzines en folie 


P. 50 
P. 19 


















N" 33 : Fanzines toujours 


P. 19 


N°27; Bootez vos disquettes 


P. 88 1 


Bancs d'essais parus dans Amstar n° 19 à 25 


P. 56 


N° 31 : Réduction du code Basic 


P. 78 


Articles et programmes publiés dans CPC n° 30 à 38 
N° 34 : Reportage : L'éditeur Génération 5 

Fanzine, quand tu nous tiens 

Solutions et plans parus dans Amstar n° 3 à 33 


P. 67 
P. 16 






P. 19 

P. 110 




INITIATION 
















P. 28 
P. 33 
P. 86 

P. 36 




LOGICIELS JEUX 




La copie des listings "en binaire'' 
Vidéo (2) 
N°27: Vidéo (3) 










N°28: Xénon (1) 


P. 81 


CAOsurCPC:splitbng 


P. 48 


N°29: Xénon (2) 


P. 31 


N° 28 : Vidéo (4) 


P. 46 


N°30; AtomicSatellit(l) 


P. 28 


Architecture et composition des RSX (1) 


P. 54 


N*31: AtomicSateUit(2) 


P. 45 


N*29: Vidéo f5) (Calamités n" 30) 


P. 20 


N°32: Solitaire 


P. 84 


CAO sur CPC : objets chaîne par chaîne 


P. 42 


N°33: Fruity 


P. 71 


A la découverte du clavier 


P. 84 


N° 34 ; Puissance 4 


P. 44 


N° 30 : Vidéo (6> 


P. 20 


Billy la banlieue 2 


P. 67 


CAO sur CPC 


P. 41 






Le clavier 


P. 73 










Analysons les fichiers 
N" 31 : CAO sur CPC : 2 types d'images 3D 
Puissance 4 


P 80 
P 36 
P. 80 




LOGICIELS UTILITAIRES 




N° 26 : Trameur 


P. 37 


N° 33 i CAO sur CPC : création automatique d'images 
N" 34 : CAO sur CPC : élimination des parties cachées 


P. 42 
P. 28 


Ann-erreurs 


P. 47 






Traitement de l'image 

Lista) 

Amslettres 
N°27: Additif à Catprog 


P. 51 
P. 75 

P. 98 
P. 27 












TRUCS ET ASTUCES 












Mettez un peu d'animation 


P. 29 


N° 27 : Barbarian - Cybemoïd - L'héritage 




Amslettres 


P. 45 


La panthère rose - Gauntlet II 




Editeur de jaquettes 


P. 80 


Escape from sïnge's castle 


P. 72 


N° 28 : Technique des masques 


P. 27 


Pêle-mêle - Premier octet à l'écran 


P. 86 


List (2) 


P. 30 


N° 29 : ATV Simulator - Clever it Smart 




Traitement de l'image 


P. 40 


Cybemoïd - Driller 


P. 80 


Anti-erreurs 


P. 96 


Affichage mode 2 - Cacher un programme 




N° 29 : Fractal landscapes 


P. 90 


Improper argument - Les moyens du bord 




N°30: Trucages du code Basic 


P. 76 


Téléchargement - Bizarre 


P. 109 


N°31: Compacta) 


P. 24 


N° 30 : Pot-pourri - Full 6128 




Etoiles et constellations (1) 


P. 69 


Tasword T DMP 200Û t cadres 


P. 48 


Double mode 


P. 92 


N° 31 : Agenda, CPC HS n" 10 - Suppression espaces 




N° 32 : Créations musicales 


P.22 


Semword - Sécurité input - 3 unités sur 464 


P. 86 


Etoiles et constellations (2) 


P. 38 


Savage - Opération wolf - Fire and Foiget 


P. 112 


Traitement de limage 


P. 44 


N" 32 : Tables de multiplication - Debugg 




Compacta) 


P. 67 


Users - Factorielles - Stream - Notions en mémoire 


P. 99 


Une routine de tri qui décoiffe 


P. 74 


N" 33 : 3 en 1 - Rectification - A la trace - Improper argument 


N°33: Horloge 


P. 25 


Scrolling 464 - Debout les morts I 


P. 29 


Une routine de tri qui décoiffe 


P. 85 


N° 34 : Test DMP 2160- Protéger une liste de programmes 


P. 99 



Pour chaque voleur de l'indice de 
contrôle, la variable «option» est égale 
à cette valeur. Nous pouvons donc 
la supprimer, 

Je sens que vous allez objecter que 
chaque valeur de la variable «posi- 
tion- représente un couple de coor- 
données, et jusqu'à preuve du con- 
traire la valeur d'une variable est uni- 
que, Certes. Mais, dites-moi, dans un 
menu horizontal, les libellés des options 
sont bien disposés sur une même li- 
gne ? Dans ce cas, l'ordonnée y est 
bien constante, non ? Et dans un me- 
nu vertical , les libellés sont bien alignés 
à gauche ? Donc c'est l'abscisse x qui 
est une constante, cette fois. Par con- 
séquent, et selon le cas, les 3 valeurs 
possibles de la variable "position» re- 
présenteront I ' abscisse ou I ' ordonnée , 

Il va y avoir quelques choix à taire. 
Décidons de construire un menu ver- 
tical, en laissant une ligne vierge en- 
tre 2 options consécutives (double 
Interligne) ; c'est plus Joli, et puis si on 



décidait par la suite de pointer l'op- 
tion courante non plus en vidéo In- 
verse, mais par un encadré, on ne sait 
jamais, , . Décidons de travailler en Mo- 
de 1 . Fixons l'abscisse commune à 1 0, 
par exemple et l'ordonnée de la Ire 
option à 5. Avec le double interligne, 
l'ordonnée de la 2ème option sera 
égale à 7 et celle de la 3ème option 
à 9. Parfait. Cela nous donne donc, 
pour l'indice de l'option un Incrément 
de 1 , et pour la position un incrément 
de 2. On devrait pouvoir résumer cela 
en une petite formule mathématique, 
SI nous appelons y l'ordonnée et II ' in- 
dice courant, nous obtenons y = 3 + 
(I " 2) ; 2 étant l'interligne, pour i = 1 
nous avons bien y = 5 ; pour i - 2 nous 
avons y = 7 et pour I = 3 nous avons y 
= 9. Résultat des courses : nous n'avons 
plus besoin de la variable «position» ; 
vous connaissez le sketch de Fernand 
Raynaud sur les «ceufs pas chers» ? Re- 
marquez bien- que si nous sommes 
parvenus à supprimer ainsi 2 variables, 
c'est suite à notre analyse ; rappelez- 
vous comme ça paraissait compliqué 



au départ. D'où l'Intérêt de travailler 
avec méthode et de ne pas courf- 
clrcuiter les étapes. 

Le programme devra contenir, 
sous forme de constantes, les 3 libel- 
lés du menu. Ces valeurs seront four- 
nies à une variable Indicée, respecti- 
vement pour les valeurs d'Indice 1,2 
et 3. Appelons cette variable llbeilé(i), 
i étant l'Indice courant (la variable sera 
dimensionnéeà3), Dans la foulée, dé- 
finissons également comme constan- 
tes l'abscisse commune (x = 10), l'or- 
donnée de départ (yO = 3) et l'interli- 
gne (il = 2) ; comme cela, si nous vou- 
lons modifier par la suite la présenta- 
tion de notre menu, il n'y aura que la 
valeur des constantes à modifier. Tou- 
jours rechercher la souplesse ! 

Je crois que vous commencez à 
saturer, alors rendez-vous le mois pro- 
chain pour la suite de notre analyse. 



GuyDUBUS 



OFFRE EXCEPTIONNELLE : 4 CASSETTES POUR 100 F !» 

Une cassette comprend les jeux, éducatifs ou utilitaires qui ont été publi és da ns le numéro CPC corr espondant 



3 : Char d'assaut - Consommation de carburant - Fonction circle 

4 : Redefcar - Carré magique - Lexique anglais/français - Maze 

7 : Cherry Paint - Discul - Conjugaison - Calcul - Colditz - Double hauteur 

Référence croisée des variables basic 

B : Cherry Painl - Tokexl - Numérologie - Discothèque 

9 : Cherry Paint - Creedata - Serpent Madness 

10 : Cherry Painl - Catalogue Disk Printer - Analyse - Mundial 86 - Arbre 
généalogique. 

1 1 : Ciel - Cherry Paint - Casse-téle de fane - Medor - Mutli fichier. 

1 2 : Cherry Paint - Mozart - Louisiane - Prot dise - Etik disk. 

1 5 : Cherry Paint - Gemaine - Moniteur de disquette - Boite à rythmes. 

16 : Poker patience -Attentif- Menu 2+. 

20 : Relief - Vision - Tri pour Bankmanager - Cat disk - Poker. 



21 : Monnaie - Oxydo - Demo-tris - Stradamuse - Dis - Cas - Charge- 
ment des RSX Bankopen. Bankread, BankwrHe, Bankfind. 
23 : Anti-erreurs - CA03D - 30 snakes - Photo-sprite - Relief - Moniteur. 
24: CAO 3D- Anti-erreurs- 1000 Bornes- Justification -Twenty 
Copy - Trames et collages - Graphofrance - Machines. 
25: CAO 3D-Amsrythm- Trois dés - Générateur de menus- Symé- 
trie - Générateur de sprites (1) - Penetror. 
26: CAO 3D- Anli-erreurs- Catalogue -Conjugue -Tchernmis- 
land - Fenêtres symélriques - Graphiques. 

27 : Création et animation de sprites - Anti-erreurs - CAO 3D - Champion- 
nat - Actions. 

28 : Anti-erreurs il - Routines machines - CAO 3D - Fichiers - Générateur 
de sprites - Catprog. 

29 : Les fichiers - Anti-erreurs 2 - Astronomie planétaire - CAO 

30 - Catprog - Pentominos. 



Je commande lots(s) de 4 cassettes à 1 00 F le lot 

Numéros des cassettes souhaitées: 

Si une des cassettes était épuisée, je désire à la place 



Nom : 

Adresse : 

Code postal: 
Date: 



Prénom: 



* Dans ia Hmito des stocks disponibles. 

"Ne pouvant être tenu pour responsable de l'achominemont des paquets postaux, mus conseillons a notre aimable clientèle ce choisir renvoi en recommandé' 
V^Htcommindé : + 10 F) Délai minimum du Hvnlten : 15 jour* à réctptkm d* I* command* 



DUCHET COMPUTERS 

51, Saint-George Road CHEPSTDW - NP6 5LA 
ANGLETERRE • Tél. + 44 291 625 780 



LE HACKER 



(version professionnelle) 



pour CPC 464/664(6128 




Encore una interface miracle de DUCHET Computers ! 

La version 4.0 du HACKER a été acclamée par la presse informatique des deux côtés de la Manche I Consultez les 

bancs d'essai élogieux des magazines français AMSTAR-CPC et AMSTRAD CENT POUR CENT ' 

Maintenant la version 7.0 professionnelle en FRANÇAIS est disponible ! 

Pour ceux qui n'ont pas eu l'occasion de lire les fantastiques baies d'essa: décrivons rapidement le HACKER : 

Le HACKER esi une interface qui se branche en 2 secondes a l'arrière d'unCPC.EIIe esi dotée d'un interrupteur de vaiidationfmvandation ainsi que d'un bouton 

"magique". En appuyant sur le bouton, vous interrompe? les programmes à tout momenl. Plusieurs dizaines de commandes sont alors à votre disposition pour 

"manipuler" le programme interrompu ! 

Vous travaillez directement en mémoire où vous examinez, modifiez, désassembiez. éditez, copiez, découpez, imprimez les programmes ! 

Le loader d'un programme vous intrigue ? Appuyez sur le bouton durant le chargement et inspectez-le ! 

Vous trichez dans les jeux ? Rajoutez des vies, modifiez la table des scores avec les PEEK et POKE du HACKER ! 

Un logiciel hors de prix et plombé à mort n'est pas assez performant selon votre goût 7 Un coup de HACKER et vous lui donnez la performance désirée ! 

Etes-vous un programmeur sérieux ? La version professionnelle 7.0 du HACKER comprend un ASSEMBLEUR intégré ! 

L'assembleur de la version 7.0 permet d'assembler directement et immédiatement en mémoire I Toute erreur est immédiatement détectée ! 

Tous les codes standard ZILOG 280 sont supportés. 

L'interface "Le HACKER" version 7.0 est le résultat de deux ans de travail ei recherches par un team de super programmeurs franco-britanniques, 

Le système opérationnel du HACKER est en français et réside entièrement à l'intérieur de l'interface. Le HACKER comprend aussi un port d'extension pour relier 

d'autres périphériques. 

Un large manuel détaillé et explicatif en français accompagne le HACKER 7.0. 

Il est évident que pour utiliser correctement le HACKER, il faut posséder certaines connaissances informatiques et savoir différencier un ZBD d'un camembert ! 

Dans le cas d'un CPC 6128, spécifiez si le bus d'extension de l'ordinateur est mâle ou femelle SV.P. 

L'interface "LE HACKER" 

professionnel 7.0 ne vaut que . 



495,00 FF 



(Pour expédition hors Europe 3|0uter 30 FF S.V.P( 



FAITES CROIRE A VOTRE CPC 464 
QU'IL EST UN CPC 6128 ! 

vous possédez un CPC 464 avec lecteur DDI1 et rêvez d'un CPC 6128. . Plus la peine de jeter le 464 dans la poubelle 
du voisin et de dépenser une fortune ' Il vous suffit de vous p'ocurer la CARTE FO.DOS 
Encore une interface miracle de DUCHET Computers ! 
La Carte FO.DOS se branche en deux secondes a l'arriére du CPC 464 ' 
Aucune soudure ni connaissance en quoi que ce soit ne sont requises ' 

vous pressez un interrupteur et votre CPC 464 fonctionne en mode 6128 avec toutes les commandes du 6128 à votre dispo- 
sition. Finie la haniise d'avoir à définir les variables. . Finies les frustrations des programmes qui ne "tournent" qu'avec 
les CPC 6128 ! Si vous avez certains programmes qui ne fonctionnent qu'avec un CPC 464. pas de problème, poussez 
l'interrupteur dans l'autre sens, et vous retournez en mode 464 I 

La Carte FO.DOS offre tous les avantages des 464 et 6128 sans aucun de leurs inconvénients ! 
Pour les programmes énormes et gourmands en mémoire, rajoutez une extension mémoire DK TRONlCS de 64K ou 256K 
et le bon vieux CPC 464 deviendra une machine professionnelle avec 128K ou même 320K de mémoire ! 
La Carte FO-DOS comporte un port d'extension pour relier d'autres périphériques. 
La carte FO-DOS est accompagnée dune notice explicative en français. 

La CARTE FO.DOS n e »,ut, U8 




420,00 FF 



pon compris 
(Pour expédition hors Europe ajouter 30 FF SV.P.l 



Le Hacker FO.DOS son! en stock et disponibles EXCLUSIVEMENT en vente par correspondance 

chez DUCHET COMPUTERS Ils ne son! pas en vente dans les magasins. 

Envoyez vite votre commande (en français) à : 

DUCHET COMPUTERS 

51, Saint-George Road CHEPSTOW - NP6 5LA 

ANGLETERRE Tél. international + 44 - 291 625 780 

ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le monde entier 

REGLEMENT A L'ORDRE DE "DUCHET COMPUTERS" par : • Mandat Poste International en Francs • Chèque personnel français bancaire ou CCP La Poste 

en Francs • EUROCHEQUE personnel en livres sterling (vous faites la conversion) • CHEQUE BANCAIRE en livres sterling compensable en Angleterre établi 

par votre banque • Cale de crédit internationale VISA, EUROCARD. MASTERCARD, ACCESS (indiquez r> D de carte et date de validité, mais n'envoyé; pas la carie]. 



■ m 



Si vous êtes pressé, passez votre commande par téléphone EN PARLANT EN FRANÇAIS ! 

Téléphonez à Caroline, Jean-Pierre ou Didier au (indicatif international) * 44 291 625 780 de 8 h à 19 h 

Nous acceptons les commandes par téléphone avec cartes de crédit. 



DUCHET COMPUTERS 

51, Saint-George Road CHEPSTOW - NP6 5LA 
ANGLETERRE - Tél. + 44 291 625 780 

EN EXCLUSIVITE : 

MATERIEL ET LOGICIELS EN FRANÇAIS POUR 
AMSTRAD/SCHNEIDER 464/664/6128 A DES PRIX 
PLANCHER ! 






PUBLICATION ASSISTEE PAR ORDINATEUR POUR CPC 6128 

(Les CPC 464+DD1/664 nécessitent une extension mémoire DK Tronics 64K] 

OXFORD P.A.O. 

iUn FANTASTIQUE progiciel en FRANÇAIS pour créer faci'emem vos mises en page. 

"~La disquette 3" comprend 350 Koctets de programmes, lichiers. projets, icônes, motifs, ligures géométriques, bordures, 
28 tontes de caractères, etc. aisément redéfinissables. 

Créez facilement vos documents, fontes, dessins, icônes, etc. 

Intégrez texte, vos copies d'écran personnelles, etc. à vos documents. 

Edition, copie et mouvement de blocs de travail entiers. 
[|- Ec "icn e - :-eati<n de caractères, motifs, dessins, etc. à un demi pixel près 
?| Zoom e«e:s m -c - vidéo inversé, "tête en bas", etc. 

; % Compatible avec SOURIS Siren (et AMX), manettes ou clavier et avec imprimantes matricielles AMSTFIAD (sauf DMP1), EPSON e- :omca-icles 
jT et de type IBM. 

|1 Copies imprimées multiples, échelle à 100 %b, à 50 %. à 25 *. 

|=| Nombreuses possibilités, de l'impression légère rapide a l'impression de précision "une aiguille" en très haute résolution. 
!| Entièrement en français. Manuel complet très détaille en français. Enfantin à utiliser. 
1 1 OXFORD P.A.O. sur disquette 3" pour CPC 6128 OCrt AA CC \ 

|| (ou 464+DD1/664 avec 128K) ne vaut que &9UjUU PP port compris S -J 

ï\ (Pour e xpédition hors Europe ajouter 10 FF S.V.P) 

|l BIG FLASHCn Plus de 200 Koctets de RSX el progiciels utilitaires en français, extrêmement simples à ulihser ' 

il Plus de 130 options D'exploration, édition, recherche, création, manipulation, information, compactage, formatage, archivage, copie, gestion d'impn- 

k mante, création de posters de 8 pages, programmation de touches, caiculations, copies d'écrans, coubie PEEK. double POKE. tri de données. 

f| traceur, gestion de couleurs, input. call. analyses, etc. 

1 1 Toutes les RSX peuvent être incorporées dans des programmes personnels. La plupart des options comportent un envoi facultatif sur imprimante. 

;| Compatible clavier, manette et souris AMX. 

t f Enorme manuel en français, bourré d'exemples. A A A AA PC 

fi BIG FLASHER (DISC 3") en français pour CPC 464/664/6128 ne vaut que &UUjvU PP port compris 

; \ (Env oi avion h ors Europe - 20 FF S.V.P.) _ 

TRANSFERTS CASSETTE - DISQUETTE 

î[ NEMESIS EXPRESS 2 Le progiciel de transfert universel 

ï| Heureux propriétaire d'un lecteur de disquettes, avez-vous un ou deux problèmes à trouver un logiciel de transfert extraordinaire pour archiver 

f; votre collection de cassettes sur des disquettes ? 

, Ne vous tapez plus la tête contre les murs ! D'abord ça fait mai, et puis ça peut réveiller les voisins !... Procurez-vous NEMESIS EXPRESS 2,.. 

I NEMESIS EXPRESS 2 comprend 109 programmes utilitaires sur les deux faces d'une disquette ! 

I NEMESIS EXPRESS 2 possède un "renifleur" automatique qui vous indiquera la meilleure façon de transférer vos cassettes. 

s NEMESIS EXPRESS 2 est le plus puissant logiciel de transfert K7/DISC en Grande-Bretagne. 

I NEMESIS EXPRESS 2 est universel. Il transfère les cassettes nouvelles, récentes ou même anciennes ! 

ï NEMESIS EXPRESS 2 pour 464/664/6128 est disponible en version française. Il est accompagné d'un manuel complet et extrêmement détaillé 

I en français --* Aft -- 

f NEMESIS EXPRESS 2 (Disc 3") en français ne vaut que «VVjWW rT port compris 

j (Envoi avion hors Europe + 10 FF SV.P.) 

; Rajoutez 30 F F el nous joindrons les dé tails de tran sfert de 1100 [ mille cent !) cass ettes avec NEMES IS EXPRESS 2 . 

Les produits ci-dessus sont en stock et disponibles EXCLUSIVEMENT en vente par correspondance 

L chez DUCHET COMPUTERS. Ils ne sont pas en vente dans les magasins. 

Envoyez vite votre commande (en français) à : 

DUCHET COMPUTERS 

î- 51, Saint-George Road CHEPSTOW - NP6 5LA 

I ANGLETERRE - Tél. + 44 ■ 291 625 780 

ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le monde entier 
\ REGLEMENT A L'ORDRE DE "DUCHET COMPUTERS" par : • Mandat Poste International en Francs • Chèque personnel français bancaire 
] ou CCP en Francs • EUROCHEQUE personnel en livres sterling (vous faites la conversion] • CHEQUE BANCAIRE en livres sterling compensa- 
ï ble en Angleterre établi par votre banque • Carte de crédit internatio nale V ISA. EUROCARD. MASTERCARD, ACCESS (indiquez rr= de carte 
I et date de validité, mais n'envoyez pas votre cartel |H?{ fiifl 

Si vous êtes presse, passez votre commande par téléphone EN PARLANT EN FRANÇAIS ! 
\ Téléphonez a Caroline. Jean-Pierre ou Didier au (indicatif international) + 44 291 625 780 de 8 h à 19 fi 
Nous acceptons les commandes par téléphone avec cartes de crédit. 
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it syslérri a tique ment re jetées . 



Cherche listing "3 dés' parties 1 et 2 Ludo- 
vic Délabre. Le Pré Latour, Les Alêrions. 54700 
P o ri t-à- Mousson 

Vends orig. D7 6128 Thunder Bl., Game 
Set&M. Sp. Act. (80 F). Echange 100 util. + 
éduc. + 150 jeux (news) Ch interface 6128 
périt TV J.-P. Nicolas, 22. rue des Noyers. 
Boulaincourt 7B770 Thotry. 

Vends originaux K7et disquettes, moitié prix. 
Tél. 47.49.59.46, Stéphane. 92500 Rueil 
Malmaison (réponse assurée) 

Vds Amstrad 6128 couleur ♦ imprimante + 
lecteur 5"1/dde 708 Ko + joystick +■ housse + 
très, très nombreux logiciels. Tél. 47.01.06 30. 

Vends jeux K7 entre 20 et 60 F (Oper. Wolf ...). 
Echange jeux disk. Ro u au d Olivier, Les Bou- 
loz. 74250 Viuz en Sallaz. Tel 50 36.86.61 
(19 h). 



Echange disk originaux R-Type contre Top 
Level, Crazy Cars 2, contre The Last Ninja 2. 
Tél. 67 53 56 88 (demander Thomas] 



Cherche moniteur couleur ou interface TV pour 
CPC 6128. Vends moniteur mono. Recher- 
che autocollants en tous genres Contacter 
Jean-Luc au 89 57.39 57 après 18 h. Echange 
possible. Zanzibar s'abstenir I! 



Cherche contacts pour 6128 pour échange 
programmes région Noyon, Compiègne ou 
Amiens Hervé Pelletier. BP 155, 60402 Noyon 

Vds dise 120 Ko, jeux util . éduc , 464, 664, 
6128 Dasilva, 41, rue Plaisance 94130 
Nogent, Marne. Prix : 100 EnvoL/24 heures 
Tel 48.73.87 .48. 

Vends 464 coul + manette + jeux : 1600 F, 
DOI + jeux ■ 1200 F, DMP 2160 * papier : 
900 F, crayon Dart ; 300 F, le tout état neuf. 
Tel 43 00 34.38. 

Vends jeux (news et anciens) sur CPC 6128, 
très bas prix cause 5"1/4 Dolivet Franck, 67. 
rue du Maréchal Leclerc. 35800 Dinard 

Vends CPC 61 28 ♦ DMP 2160 + 70 disks + 4 
manuels -*- nomb revues, t. b. et Tel Antoine 
au 45 06.72.77 après 19 h. 

Vds ordinateur jeux vidéo Pack + manette + 
18 jeux, t. b ôt., prix à débattre. Tel 
23.07 8981. 



Vends CPC 6128 couleur + 43 disquettes + 
2 joysticks. Px 2600 F. Tel 43.65.30.56, Fer- 
quel, 32, bd de la Libération. 94300 Vincen- 



Désirerais progr listing d'impression sur en- 
veloppe pour 6128, Panasonic KX P10B1 et 
pour celle-ci sa compatib 94.20.07 28. 

Vends CPC 61 28, clavier * MPZ ♦ DMP 2000 
+ 100 DKS + revues + joystick, tout 3000 F. 
M Teh, tél. 46.34.51.13. 

Vends T09 + lecteur cassettes + disk + cass. 
+ jeux + manettes + contrôleur et de nom- 
breux livres. Prix 4000 F Tel 43626467, 
Val de Marne. 

Vds CPC 6128 couleur (complet), t. b. et. + 
revues + cordon K7 + boite de rgt disquettes 
avec clé : 2700 F. Tel 42.51 03 94 ap 19 h 

Vds CPC 4 à 13, 15 à 17, 20 à 25, 27 à 38, 
bon état, prix â déb. * autres revues * disks 
3~. 20 F/1 . plein de logiciels. Tel 78.26 31 52. 



z gagner bcp d'argent, honnê- 
tement et facilement Envoyez 2 timbres à 
Hamby Fabien, 4, av. Pte de Vanves. 75014 



Affaire, vends lect. de D7 DD 1 , interface (neuf). 
1 300 F + originaux K7, 50 à 80 F + D7 news, 
40 F à débattre. Tel 71.08 50.93. après 19 h 

Vends CPC 61 28 couleur + 3 joysticks + syn- 
thé vocal + stylo optique + Multiface 2 + 50 
disk pleins : 3500 F. Tél. 40.48.16.77 



Vends Amstrad 464 monochrome * 5 jeux + 
cassette "expérimentations, démonstrations" 
■<■ manuel * joystick ♦ programmes, le tout 
2000 F Paillard Olivier, tel 99.55.91 .28. 

Vends revues Amstrad Mag (11 à 14), CPC 
(5.7, 11.27 + HS),Amstar(5, 11 à 15), Heb- 
dogiciel (22 numéros), moitié prix + Microstrad 
(3 à 8, 10), 20 F pièce Tél. au 66.22.24.17. 

Vds VG500 * lect. cas. + K7 jeu » interface 
man. Réelle : 2500 F, vendu 800 F. Tél. 
22.83.11 23, après 18 h. 

Cherche correspondants sur 6128 (possède 
Robocop, Dragon Ninja et autres news). Tél. 
(16) 30 95.81.92, demander Cyril, après 17 h 



Vends dise 3" pour 6128 remplies au choix 
de jeux. util, en tous genres, 39 F le dise. Tél. 
87 09 78.28, demander Eric 



Vends jeux sur 61 28 ( Guenl. War, Rambo 3.. .), 
la disquette pleine 25 F (disquette non four- 
nie). Tel 46.09.85.67, demander Philippe. 

Vends Amstrad CPC 464 + joystick + env 80 
jeux, le tout : 1000 F. Tél. 64.02.00.11, pen- 
dant heures de bureau 

Urgent achète lecteur DDI-1 de disk pour CPC 
464. Prix maximum : 950 F. Tel 5001.18.66, 
si possible avec doc. et avec disk vierge 

Echange 10 jeux et 2 compils (1943; Opéra- 
tion Wolf, Trantor, Cybemoid. ) contre jeux 
assez récent. Appelez Vincent, 40.36.05.25. 

Vds 664 coul. + kit téléch. ♦ joys 40 DK + 
lect. 3.5 P nu sans alim. : 2500 F, ext. 64 K. 
DK : 400 F DMP 2000 : 1000 F. Tél. (1) 
46.36 60.86. après 18 h 

Vends Amstrad 6128 moniteur couleur avec 
joystick + housse + nombreux jeux + revues. 
Tél. 53.40.15.23, heures repas (départ. 47). 



Vends CPC 464 mono + nombreux jeux + 
manette + 6 revues (Amstar, Tilt,...) : 1600 F. 
Tel 30.33.35.16, après 18 h 30 (David), ur- 

Vends disks originaux ; 1 2 jeux exceptionnels : 
80 F. Les défis de Taïto : 80 F, Beyond the 
loe Palace : 80 F. Tél. 20.08.86.38, après 19 h. 

Comment gagner beaucoup d'argent sans se 
fatiguer. Tél. 63.95.03.63, David Salomez, 15. 
rue du Cdt Chatinière. 82100 Castelsarrasin 

Vends CPC 464 couleur + nombreux jeux + 
joystick + nombreuses revues : prix 2200 F. 
Tél. 88.08.51.33. demander Régis (Alsace). 

Pour gagner un max. d'argent avec un min. 
de travail. Envoyez un timbre à P. Geroudet, 
1 , rue Acquaviva. 13004 F* 



Vends Amstrad CPC 664, très peu utilisé + 
manuel + disquettes de jeu, logiciels : Turbo 
Pascal + joystick Tél. 45.78.85.20, après 18 h. 

Vends CPC 464 couleur + nb jeux +■ 2 joys- 
ticks + magazines : 2300 F. CPC 464 garan- 
ti Lemonnier Laurent, 19. rue de Veronèse. 
59000 Ulle 

Vends scanner Dart graphique et son logiciel 
+ notice, peu servi. 500 F. Tél. 43 85 13 61, 
après 18 h. 

Vends jeux et utilitaires à très bas prix S'adres- 
ser à Briss et Cyril. Sainte-Marguerite, 05000 
Gap, réponse assurée 



Recherche K7 jeux et éducatifs pour CPC 464. 
Lecomte C, rue de la Belle Lande. 27150 
Longchamps 

Rech pers. pour création club Amstrad ds le 
Pas de Calais. Ecr. à M. Lefetz Eric, 39. rue 
Bernard Palissy 62000 Dalnville. 

Recherche "programmer en assembleur" de 
A. Pinaud (PSI) * Turbo Data Base Toolbox 
♦ doc. Tél. 42.49.03.11, demander Bruno 

Vds Amstrad 61 2B couleur, joystick, lecteur 
5" Vortex, nbreux logiciels et revues + ma- 
nuels Prix 4000 F. Tél. 60.15.16 59. 

Attention ! Vds au prix de 100 F l'un, des disks 
originaux : Cosa Nostra, 1943, Fire Forgetou 
220 F ies 3 Tél. 70.31 .67.49. demander Gré- 
gory (après 18 h le lundi et vendredi, et à 16 h 



credi). 

Vds moniteur vert GT65, état neuf, 600 F * 
port. Tél. 31 87 61 84, le soir, à débattre. 

Vends CPC 464, 1. 3\ I. 5"1/4, D7 vierge, nbr. 
soft -t-boîte de rangement + revues * livres 
Contacter Sanchez Patrice Tel 61.64.35 07. 

Vds 61 28 coul. avec 2 lect. disk + imprimante 
+ nombreux livres * utilitaires (Mult, TT ges- 
tion) + jeux. Tel 33.48.09 18, ap. 16 h. 

Vds disk pleines de jeux pour 6128, prix 35 F 
* f. port Demander liste à Fabrice Meunier. 
65, rue des Silos, La Grive, 38 Bourgoin-J 

Ach. ou Ech log. + not. : AMX, Pagem , Dis- 
col 5 1 ou autres util Ecrire à M Ripoll Lau- 
rent, 11, rue Beau Soleil 89240 Pourrain. 

Vends CPC 664 + ext. 256 K + 100 dises 
(news) * boîte rangement + housse + écran 
couleur Tel 48 38.45.22, Lebarzic Eric. Prix 
à débattre, PS. + joys 

Vds souris AMX ♦ Pagemaker. 500 F, Tas- 
word + Mastercalc * Masterfile + émulation 
minitel : 400 F, collection CPC : 200 F. Tél. 
77.57 07 76 

Vends PCW 9512 * bureau + chaise + ru- 
ban. Contacter Patricia, tél. 47 84 35 90. après 
19h. 5500F. 

Vends MSX + 7 jeux + cordon péri. TV + cor- 
don magnéto, prix neuf : 1900 F, vendu 900 F 
Sceaux, Chauliat Frédéric, tél. 46.60 49.95. 

Vends revues CPC 30 à 38. Recherche lec- 
teur 5"1/4 pour CPC 464, bible CPC, Auto 
Form, Assembleur. Echange jeux util. Tel 
44.83.1526, soif. 

Vends synthétiseur vocal Technimusique pour 
300 F. Echange news sur 6128. Tél. 
47.60.23 59. demander Marc ou Yves 

Vds CPC 464 coul . peu utilisé + 40 jeux ■> 
joystick neuf + housse protection clavier, écran 
+ 100 revues, le tout ; 3000 F. Tél. 48.73.96.48. 

Vends CPC 464 mono + autoradio double 
lecteur + originaux + accessoires + laveur de 
lecteur. Tout pour 3500 F. Tél. 48.48.33.27 



Vds 464 coul. + joyst. + 60 jeux + revues + 
manuel, valeur 6000 F, vendu 2600 F Char- 
ly, après 19 h au 47 67 48.85. 

Dément ! Vends CPC 6128 couleur* 100 jeux 
+ joystick * housses + câble CL1 ; 2900 F. 
Tel. 50.73.50.37, Xavier (week-end après 18 h). 

Urgent vends jeux originaux sur D7 (CPC 
6128), possède Robocop, Dragon Ninja. A 
partir de 90 F chacun. Tél. 67.64.00.04. 

Vends revues Amstar n° 1 à 28 : 250 F l'en- 
semble (bon état) Baudrillard Laurent, 17. rue 
de la République. 45390 Puiseaux 

Vends CPC 6128 coul. (sept 87). très bon 
état + 180 jeux + joystick -t- b. rangement, le 
tout 3200 F à débattre. Tél. 49.80 10.06 (ap 
18 h 30). 



CPC 61 28 emprisonné cherche listings divers. 
Patrick Ventresque, 10427 Bat 2 132, caserne 
Thoiras, 17410 St- Martin de Ré. 

Cherche utilitaires tous styles avec notices, 
6128. Urgent ; OCP Art Studio. AMX Press, 
Pagemaker. Tel 68 66 99.26, 68.34.56.91. 

Cause chômage vends 6128 couleur. 60 jeux, 
revues, bureau, valeur 7500 F, vendu 4500 F, 
garantie 6 mois. Tél. 21 .98.57.46. 

Vends CPC 464 couleur + joys. + nombx jeux 
récents + livres + revues, le tout 1800 F Tel 
34.69.31.38. le soir après 19 h. 

Vends Amstrad CPC 464 couleur en excel- 
lent état + manuel + nombreux jeux (Barba- 
rian, Fruity Frank), 2500 F. Tél. 73.84 35.06. 

Vends CPC 464 couleur + nb. jeux + joystick 
+ revues * utilitaires, bon état (87), 3500 F. 
Sutra Fabrice. Talange, tél. 87.71.02.87 



Vends Amstrad 6128 coul + housses + 100 
jeux + boite de rangt + nbreuses revues, très 
bon état Prix : 2800 F. Tél. 34.13.73.13 ap. 



Stop affaire I Vds adapt. péritel pour 6128 et 
464 : 800 F, port compris Ecr. : M. Lafond, 
212. rue Salabery. Contrexeville. Vosges. 



61 28 + DMP + F1X cherche contacts sur Tours 
ou région (branché surtout utilitaires). Tél. 
47.64.61.64 (Maurice) 

Contact possède Dragon Ninja, Robocop, After 
Bumer, Turbo Cup. Batman II, Off Shore 
Warrior, Discol 5.1, Op. Wolf (D7). Nicolas, 
tél. 39.1 2.04.75 (18 h). 

Echange progr. radio et utilitaire Oric Atmos 
sur K7. Liste sur demande, M Vaude André, 
47. av. Jean-Henri Dumant 77100 Meaux 

Recherche désespérément Boulder Dash 2 
pour CPC. 48.80.20.46, Laurent Fouques, 
94500 Champigny, 2, rue Rodin 

Ach. ou éch. contre jeux ou util , livres et re- 
vues, bon état, pour Amstrad 6128 H Lor- 
rain, Route de Fretterans. 71270 Pierre de 
Bresse. 

Echange jeux 61 28 Téléphonner à Benoit au 
41.67.00.74, le week-end ou à Guillaume, 
41 67.77 75, en semaine 

Achète lecteur disquettes DD 1 . Faire offre au 
48.36.69.36, 93700 Drancy. 

Vds 6128 couleur + adaptateur TV + 2 ma- 
nettes + 25 disquettes, le tout garantie 11/ 
89. vendu 3600 F ou au détail. Tél. 43 28 32 92. 



Vends CPC 464 couleur + lecteur DD1 * 25 
dises + revues * joystick : 2500 F. Tél. 
21.51 42 12. 



ANNONCEZ-VOUS ! 





LES PETITES ANNONCES ET LES MESSAGES 

Attention, vos PA seront mises sur le serveur avant la parution du journal 
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Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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Vds CPC 664 monochrome + adaptateur péritel 
+ imprimante DMP 2000 + 40 disk (Mortville 
Manor, Blood). Tél. 47.68.51.82, après 18 h. 

Vds Amstrad 6128 couleur . lect. K7 * câble 
* nbx logiciels + livres + revues + joystick à 
partirde 3990 F Anthony. 48.86.71.75. 

Vends interface TV pour CPC à télécommande, 

1 an, valeur MOO F. vendu 900 F (frais de 
port compris). Téléphonez au 839650.59. 
Ma net Laurent, 10, ruedu Docteur F riot 54000 
Nancy. 

Recherche programme pour CPC 464 (débu- 
tant), gratos. Ecrire â : R. Bezard, 17, rue 
Grande Anguille. 35400 St-Malo. 

Vends CPC 6128 Qwerty, 12/87, mono + joys- 
tick + adap. TV + logiciels + jeux (100) + dis- 
quettes + docs, sous garantie ; 2800 F. 
64.88.36 08 

Echange jeux sur 6128, possède news. Té- 
léphoner au 68.32.68.31 ou écrire â Coustal 
Christophe, 10. rue des Lys. 1!100Narbonne. 

Cherche jeu Roger Rabbit pour CPC 464 en 
très bon état. Lemonnier Laurent, av. Rhin et 
Danube, porte 5 59370 Mons-en-Baroeul. 

Vds Amstrad CPC 464 * lecteur disk DD5 + 

2 joys. + 1 doubleur joys. + disks + moniteur 
couleur. Dardilhac Boris, 14, rue du 14 juillet. 
84000 Avignon. Tél. 90.85.18.60. 

Vends Amstrad 6128 coul. + joystick + nbrx 
jeux, prix :3500 F. 7, square de la Belle Epine. 
95800 Cergy-Pontoise Tél. 30.32.14.41. 

Vends tapis souris neufs, dim : 20x23, colo- 
ris : rouge Prix 20 F pièce Tél. 60.83.35.33. 
demander Yann. 

Vends Amstrad CPC 61 28 couleur * 26 disks 
+ manuels, le tout 3500 F à débattre. Tél. 
30.38.19.07 à Eric, après 18 h. 

Vends CPC 464 +110 jeux +■ manette + re- 
vues, 1400 F. DD1 + D7. 1300 F (très bon 
état), à débattre. Tel 44,48.39.95. 

Vends disks originaux ; Victory Road : 100 F 
et Arkanoid 2 : 75 F. Tel 25 78 38 33, de- 
mander Brahim après 18 h. 

Vends Amstrad CPC 464 couleur + lecteur 
DDI1 + 16 disks + 10 cassettes * revues. Prix 
3500 F Après 18 h. tél. 39.71 60.29. 

Vds Atari 800 XL + lec. K7 + 2 joysticks * 
table graphique + revues + manuels + nbrx 
feux. Tél. 39.83 91 .23. Prix 1000 F 

CPC run club propose plans, bidouilles, lis- 
tings. Pour tous renseignements, écrire à 
Hervé Collombar, La Salle. 741 10 Morzine 

Okimate 20 + 6128 cherche idem pour con- 
seils utilisation (ça coince I) Tél. 68 66 99.26, 
soir ou 68.34.56 91, h. b. Cappi. 65, rue de la 
Lanterne. 66000 Perpignan. 



Vends 6128 coul + 30 DK -t- 100jeux (news) 
+■ revues (CPC) * util. (Discology 5.1) ; 2800 
F (à débattre). Antoine, tél. 20 46.22 62 (Nord) 

Achète extension mémoire DK Tronics 64 K 
ou 256 K pour Amstrad CPC 464, Tél. 
29.91.08 18. 

Vends extension de mémoire 64 K pour CPC 
464 ; 350 F. Délabre M , Le Pré Latour, Les 
Alérions, Pont à Mousson. Tél. 83.81 .23 08. 

Vends Amstrad 464, moniteur couleur + lec- 
teur de disquettes 3"1.'2 * plus de 200 jeux 
sur cassettes et disquettes, enfin tout cela â 
un prix honnête de 2000 F, prix à débattre. 
Téléphoner au 47.49.61.54 après 19 h et 
demander Grégory. 

Recherche imprimante 2160 avec scanner 
Dart Les deux : 1 500 F. Laisser un message 
sur 3615 RTEL : Bal Croc'disk Merci. 

Vends CPC 464 mono + crayon optique + nbx 
jeux + revues + livre programmes + manette. 
Prix 2000 F. Caron Johnny, La Croix en Brie. 
64.08 30 57. 

Vends souris AMX pour CPC 464, 664, 61 28. 
Prix 480 F. Tél. 87.75.35.96. demander Eric, 
après 19 h. 

Vends Amstrad CPC 6128 + moniteur mono 
+ nbrx jeux et util. * 25 revues + 2 joys., le 
tout en très bon état; 2600 F Tél. 45.66.52. 18. 

Vends Amstrad 464 couleur + lecteurs DD1 
etFD1 + imprimante DMP1 + livres + disquet- 
tes à débattre. Tél. 82.83.60.16, Chaumariin. 

Vds 10 jeux orig. disk (Fer et Flamme, Super 
Ski, Quad. ), de 70 F à 150 F. Bondu Sté- 
phane, 30. me de l'Amitié 44700 Orvault. 

CLaude Le Moullec (auteur) vous crée le lo- 
giciel qui vous manque. Travail à façon ra- 
pide et soigné Contact au 96.38.94.24. 

Echange jeux sur CPC 6128. Envoyez vos 
listes Réponse assurée. Courtin Christian. 23, 
rue Marcel Porier. 59190 Hazebrouck. 

A vendre Amstrad CPC 464 coul + lecteur 
disk DD1 -t Mirage Imager + 90 disk + 50 K7 
+ kit téléchargement, valeur 1O000 F, cédé à 
3500 F. 65.42 69 36, après 19 h. 

Vends CPC 6128 couleur + imprim. Peritec +■ 
joystick + 2 boîtiers de rangem. disks + 650 
jeux et util. + revues : 4500 F. Tél. 43.70.03.57. 

Très urgent vends CPC 61 28 mono + manuel 
+ disks System + 10 disks + 2 livres. Px 2000 F. 
Tel (1) 60.60.34.48. le soir + week-end. 

Echange plus de 60 jeux sur 464 CPC origi- 
naux. Sérieux envoyer vos listes à Vandaul 
Pascal, rue Emile Vol, 7850 Ollignies. 

Vends jeux originaux sur CPC disk et K7, liste 
sur demande François J. -Marie, Montlouis, 
18160 Lignières. 
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SORACOM OUVRE SON SERVICE LECTEUR VPC 



Afin de satisfaire plus directement ses lecteurs,SORACOM ouvre son propre service de vente par correspondance. 
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Nombreuses 
routines : utilitaires 
de programmation, 

graphiques, la 
gestion de fichiers, 
utilitaires 
imprimontes. 

IIMJ 








Pour tous les 

d'ondes courtes, 
codage, 
décodage, 
réception/ 
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COMPILATION 

CPC 

N° J 

(du CPC n" 1 



Disquette ; 250 F (Nlle édition) 




COMMLAriON 



COMPILATION 5- 6-7S 
CPC 

N"2 




Ce logiciel permet l'étude de fonctions, de suites 
numériques, et la résolution d'équations. 

— 1 

• Etude de toutes les fonctions à 2, 3 et 4 variables, 

• Etude de suites arithmétiques, géométriques ou 
définies par une expression, 

• Résolution d'équations trigonométriques sur le cercle. 

• Possibilité de tracer dans 2 modes graphiques, et 
dans un repère quelconque, avec une échelle variable. 

• Variations, calcul des maximums et minimums, et 
des points d'intersection aux axes de la fonction. 

• Calcul de dérivées. d'Intégrales. 

• Tracé de tangentes, tracé et étude des fonctions 
réciproques. 

• Courbes en coordonnées polaires. 

• Sauvegarde et Impression des graphiques réalisés. 
Disponible sur disquette 3* pour CPC 464. 664 et 6128. 
au prix de : 230 F Rél. : BE P001 



MULTICOURBES 

de Sylvain VIEUJOT 
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POUR FAIRE RIMER 



EDUCATION ET RECREATION, 



MULTICOURS UN CHOIX DE 3 EDUCATIFS + 1 JEU 

MULTICOURS m 




tV.t'IM 




Géographie : Voyage suj 
dien, des fortes el faiblesse: 
Jeu ! 1 jeu divertissant à dé 



Réf. : GU 5570B4 m.HHl|j f 
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NE PARTEZ PAS EN VACANCES 

sans protéger votre ordinateur 

et ranger vos disquettes. 



Offre valable dans la limite du stock disponible 



OFFRE EXCEPTIONNELLE 

SUPERBE îlOBSss s3œ3]fetQ3c?': 







DES LOGICIELS 
NIVEAU MATERNELLE ET PRIMAIRE 



j EDUC-MATERNELLE-I 



reconnaissance de la graphie des 
lettres et des nombres. 

- Apprentissage des lettres de 
l'alphabet avec image associée à 
chaque lettre Apprentissage des 
nombres de 1 



MC 15 CPC disk 

- Reconstituer des séries d'images - 
Reconstituer des mots - Reconstituer 
des séries de nombres de 1 à 6. 
L'enfant exerce son esprit d'analyse 
et découvre les règles qui régiront 
ses premiers apprentissages comme 
l'organisation du travail écrit sur une 
page, le sens de la lecture et de 
l'écriture, le retour à la ligne... 

MC 18 CPCdîsk 



MATHS-CE. 

œfiwii $3-: &<$< 



Ce logiciel propose plusieurs points 
d'exercice de niveau cours 
élémentaire, 

- Ranger des nombres en ordre 
croissant et décroissant - Comparer 
des nombres (supérieur inférieur) 
sommes produits - Compter pas à 
pas, ( 1, 2, 5, 10, 20, 40...) -Calculs 
sur les opérations élémentaires 
(tableau de double entrée) - Compte 
la monnaie - Lire et afficher l'heure - 
Déplacer une tortue (exécuter et 
retrouver) - Symétries axiales. 

MC01 CPC disk 
MC210CPCK7 



MATHS-CM.I 



sur les calculs (opérations, 
fractions...) ou la géométrie 



(symétries sur repère orthonormé 
avec possibilité de construction de 
figures..,) -Opérations verticales su 
des entiers (avec retenue) - addition 
soustraction - multiplication - 

- sur des parties de rectangles, de 
camemberts - fractions équivalentes 
numérateurs d'une fraction... 

- Calcules d'aires : 

-carré -rectangle.., avec explication 
des formules en cas d'erreur 

- Calcul de volume 

- Symétrie (centrale et axiale) 

- Suites proportionnelles 

MC 02 CPC disk 
MC 200 CPC K7 

FRANÇAIS-SONS. 

1 - Compléter des mots avec les son 
ou syllabes qui conviennent avec 
choix entre deux sons ressemblants 

2 - Compléter des phrases aveedes 
mots à choisir dans des séries de 

3 - Sélectionner dans des phrases le: 
mots ayant les sons indiqués. 

Une série de sons avec niveau de 
difficulté progressif peuvent 
convenir aux élèves des classes de 
CP pour l'option! et i 
CEI CE2 pour les opt 

MCI 2 CPC disk 
MC 208 CPC K7 



de 



■ "■11 



ORTHO-CM. 

Ce logiciel permet d'apprendre les 
règles principales de l'orthographe 
en complétant des phrases (19 règles 
ex : àoua,on ou ont...). 
A chaque faute, une explication est 
donnée à l'élève sous la forme d'une 
question de remplacement qui lui 
permettra de comprendre son erreu: 
A tout moment, cette règle pourra 
être a/fichée pour explication. 

MC 11 CPC disk 



FRÂNÇAIS-CM. 

s •.■v.;-' _ • ^ 

1 - Dictée : cette option permet a un 
instituteur ou à un parent de dicter 
un texte à l'élève avec correction 
automatique après une ou deux 
fautes sur chaque lettre (au choix) et 
avec comptage des fautes. 

Un fichier niveau CM1 CM2 dictées 
est fourni avec ce logiciel mais une 
option de création permet de créer 
des dictées de tout niveau. 
Une option lecture permet également 
de lire les textes de ce fichier. 

2 - Participes passés avec ETRE et 
AVOIR : cette option permet 
d'apprendre à accorder les participes 
passés avec les verbes ETRE et/ou 
AVOIR avec sujet, complément 
d'objet direct ou indirect, masculin 
ou féminin, singulier ou pluriel. 

A chaque faute, une explication du 
corrigé sera visualisée. 
Un fichier de phrases est également 
fourni, ainsi qu'une option 
permettant la création de ses propres 
fichiers d'e 



3 - Conjugaison : ce module permet à 
l'élève d'aprendre à conjuguer les 
verbes des 3 groupes aux temps de 
son choix (imparfait, futur antérieur, 
présent...) sous la forme de phrases 
à compléter. 

A chaque faute, une explication sera 
visualisée et le comptage de points 
apparaîtra à la fin de l'exercice. 

MC 13 CPC disk 



v GEOGRAPHIE-PRIMAIRE. 



Cours et exercice suivant niveau : 
Le Soleil - La Terre - Les points 
cardinaux - Les saisons - Le relief - 
Les cours d'eau et les mers en France 
- Les ports en France - Les grandes 
villes - Les pays frontaliers. 

MC 19 CPC disk 



Pour tous tes logiciels de I 



j MC, envoi ordinaire par poste ! 10 F par logiciel. 



DES LOGICIELS NIVEAU SECONDAIRE 



GRAMMAme-65. 



Ce logiciel traite des notions de (onction: 
et nature des groupes de mots 
constituant la phrase (sujet, verbe, 
complément...)- - Apprentissage avec 
rappel de cours adapté à chaque 
situation - Révision générale. Les 
221) phrases contenues dans ce logiciel 
sont réparties en 2 niveaux et couvrent 
plus de 140(1 questions. Au niveau 1, 
l'utilisateur peut commencer en CM2. 



MC 17CPCd.sk 



- Opérations t- - x / - Fractions - Calculs 
d'aires - Calculs sur les relatifs - 
Pourcentages avec graphismes - Suites 
proportionnelles avec graphisme - 
Symétries orthogonales. 



MC03CPCd.sk 
MC 201 CPC K7 



- Angles - Symétries 



MC 21 CPC disk 
MC 202 CPC K7 



MA7S-S4. 



Multiples 



vil enti. 



entier naturel - Décompostion d'1 entiei 
naturel - I' CCD. et PPC M. - Calculs 
algébriques - Rationnels (simplification: 
et opérations de fractions) - Equations e 
inéquations dans R 

MC04CPC 



MATHS-3. 



Régionnement du plan- Calculs sur les 

trigonométrie. 

MC 05 CPC disk 



EQUATIONS. 

^ 1, 



Equations du second degré avec 
interprétation graphique - System 

équations p inconnues (n,n<8) 

MC 06 CPC disk 
MC 205 CPC K7 



MATHS SECOND CYCU-l. 

te 

Equations du second degré avec 
interprétation graphique - Courbe Y - f(x) 
avec choix du repère et des unités - 
Intégrales par la méthode des rectangles 
avec interprétation graphique et 
exercices - Suites récurrentes avec 
graphisme - Fonctions réciproques 

MC 07 CPC disk 
MC 206 CPC K7 



MATHS SECOND CYCLE-2. 

■ ■■■'■■ 



mages par application a/fine - Courbes 
ivec options (dont hardeopy) - Courbes 
■ ! -;■: ■]■■■■ définies par 

norceaux - Familles de courbes - 
bourbes planes (cinématique) - Courbes 



MC 08 CPC disk 
MC207CPCK7 



OCOMCTBlt PIANC. 



Deux logiciels accompagnés 
d'explications détaillées : 
- Un utilitaire de dessin géométrique 
pour tracer points, droites, segments et 
cercles, le classique «TRACER à la règle 
( ou au compas" accompagné de 



■es et de tous les résultats de 
géométrie analytique. Une figure peut 
être sauvegardée ou imprimée. 
Huit exemples classiques de 
constructions géométriques 
accompagnent cet utilitaire (bissectrices, 
tangentes...). 

- Une élude par le dessin des 
TRANSFORMATIONS 
GEOMETRIQUES (translations, 
homothétie, rotation, symétrie axiale et 
centrale, similitude) sur des figures 
simples (carré, triangle, losange...). 

MC 09 CPC disk 



Dessin géométrique dans l'espace : 
utilitaire de dessin pour tracer points, 
droites, segments et plans accompagnés 
de commentaires éventuels avec 

é de sauvegarde et 
d'impression. La partie importante est la 
perspective choisie - La perspective «fil 
de fer» qui permet de refaire le tracé sous 
des angles différents - La perspective 
avec les pians colorés qui donne une 
meilleure visualisation. 

Une représentation de SOLIDES dans 
l'espace avec : Entrées du solide de votre 
choix - Impi - Je données 

- Choix des angles de perspectives - Des 
exemples de solides (solides de 
PLATON, étoile de KEPLER...) 



MC 10 CPC disk 



EXAMS. 



Ce logiciel comprend une partis 
Questionnaire à choix multiples 
partie Liste de vocabulaire. 
Q.C.M. 



Permet de testei 

- 3 fichiers de culture générale 

- 1 fichier sur la Révolution française 

- 1 fichier sur la langue anglaise 

VOCALIST 

Permet de tester ses connaissances sui 

langues 

- 3 fichiers ANC LAIS-FRANÇAIS 
11 est possible de créer ses propres 
Q.CM sur tous sujets ainsi que ses 
propres VOCALIST sur les langues 

MC 14 CPC disk 



Pour fous les logiciels de ta série MC, 



s par poste : 10 F par log 
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ORTHOGRAPHE CES 

Niveau CT2 

Ce logiciel comprend : 

- 20 règles d'orthographe 
-20 exercices d'applicalions 

- 5 testes contrôles 

Il couvre l'ensemble du programme 
d'orthographe de la classe du CE2 et 

règle ou de faire le bilan de ses 
connaissances. Le succès d'une méthode 
qui o lait ses preuves : la méthode 
O.R.T.H. 



Réf. Dl 001 CPC : Disk 
Réf. Dl 002 CPC : K7 

. ORTHOGRAPHE CM 

ORTHOGRAPHE CE2, ce logiciel 
s'adresse ou» élèves de CM. 

Réf. Dl 003 CPC : Disk 
Réf. Dl 004 CPC : K7 



; CAlCUl CM _ ^_ 

Addsous ■ Niveau primaire et collège 
Apprentissage e! consolidation des 
techniques de l'addition et de la 

de difficultés, un bilan pédagogique 
fourni après chaque usage. .. des millier 

Divisions I : Niveau CM2 b! collège 
Sous lorme de rallye automobile, 
construction el/ou consolidation de la 
technique opératoire de la division grâc 
au* quatre modules progressifs. 



S U r 



support pour Amstrad. 



Réf. Dl 005 CPC : Disk 
Réf. DI006CPC:K7 



OBJECTIF CALCVL CP 

Niveou CP 

Ensemble de logiciels vivant, facile à 
utiliser pour apprendre à compter 
(COMPTE el KIM) ranger les nombres 
(ORDRE, ALGOI se repérer dans l'espace 
(CODE) Plusieurs niveaux de difficulté 



Réf. Dl 007 CPC: Disk 
Réf. Dl 008 CPC: K7 



! KIT 3éme/2nde 


PREMIERS PAS 




VERS LA ROBOTIQUE 




UNE PREPARATION EFFICACE A 




L'ENTREE EN SECONDE. 




Conçu par des enseignanls des collèges 


l'ordinateur pour communiquer avec le 


et des lycées, ce KIT permet aux Futurs 


monde extérieur. - De donner un ordre à 


élèves de seconde de consolider leurs 


un élément extérieur : faire tourner un 


acquis de troisième en français et en 


moteur, allumer, éteindre une ampoule, 


mathématiques. 




Dans ces deux matières, l'élève choisit le 


information venue du monde extérieur : 


point de programme qu'il veut 


allumer une ampoule quand l'intensité 


approfondir 


lumineuse baisse, faire ralentir un train 


Une série d exercices lui est proposée. 


électrique si un autre entre en gare, etc. 


Pour les effectuer dans les meilleures 


Toutes ces manipulations simples et bien 


conditions, il pourra dès qu'il sera en 


d'autres sont réalisables à l'aide du 


difficulté appeler une aide. Le parti-pris 


matériel fourni : Interface + moteur, cellule 


pédagogique du KIT 3ème/2nde est de 


photorésislonte, interrupteur à lampe 


favoriser chez l'élevé une attitude active 


souple, interrupteur de course, boulon 






recours à l'aide. 

LESPLUSDUKIT3ème/2nde 
LE TRAITEMENT DES REPONSES très 
performant prend en compte un grand 
nombre de formulations différentes pour 
une même réponse , 

UN GRAND NOMBRE DE DONNEES 



peirr 



s 3 si 



tdedor 



proposées par les auteurs du KIT, les 
données tirées au hasard ou ses propre 



Réf. Dl 009 CPC : Disk M: Ivl J 



[KIT CM2/6ènw 

Programme du CM2 : orthographe, 
révsions pendant les vacances, KIT CM2/ 









- Méthodologie 



Réf. Dl 010 CPC: Disk 
Réf. Dl 011 CPC :K7 



Se programme dans n'importe quel 
langage : BASIC, LSE, FORTH, LOGO, 
ASSEMBLEUR... De nombreux exemples 
détaillés figurent dans la notice utilisateur 
Une bonne introduction à OMNIBUS. 

Réf. Dl 012 CPC: Disk 



DESTINATION MATHS 

(Gér.ératon 5} 

Afin ae participer à lu grande avenruie 
spatiale du XXIème siècle, développez v 
aptitudes mathématiques I 
L'ESSENTIEL DES CONNAISSANCES 
pour CE, CM, 6ème/5ème. 
TRES GRANDE FACILiïE D'EMPLOI, 
REALISATION EXCEPTIONNELLE : déco 



Réf. G5 001 CPC: Disk 

«sa T \ yssas 

Réf. G5 002 CPC : Disk 
Réf. G5 003 CPC : Disk 



TROUBADOURS 

ftaokho.-} 

lancez voi.) j v r la ircco dos chovolics du 

poétique et musicale. (Pour filles et 
garçons à partir de neuf ans). Une 
monière originole et plaisante d'aborder 
la lecture, l'expression écrite, ie 
vocabulaire, la musique. CONSIDERE 
COMME UN DES MEILLEURS LOGICIELS 
EDUCATIFS PAR LA PRESSE. 



Réf. G5 004 CPC : Disk 



Un récapitulatif des articles et des programmes publiés se trouve dans le n 19 pour les CPC n 1 à 1 7 
et dans le n 30 pour les CPC n 1 8 à 19 



CPC n" 30 : Les caractères de contrôle - Astronomie plané- 
taire - Branchez le Turbo - Anti-erreurs 2 - Traceur d'oscillo 
grammes - Sauvegarde et impression d'écrans sur Minitel - Jeu 
de dames - CAO 3D - Initiation à CP/M. 

CPC n" 31 : Amstrad à l'école - La programmation du joystick 
- Branchez le Turbo - Créolion et animation de sprites -Tout sur 
îes fichiers - Pluriels des noms -CAO 3D - Statistiques -Trons-Pen 
CPC n° 32 : Repré 



Traitement de 


l'image 


■B 


«a 


do 


Création et or 


imation 


de 


*P 


ites 


CPC n° 33 : 


'art de 






iser 



s graphiques en X-Y - Missive - 
- Branchez le Turbo - 



6 G. SX. 
i ■ CAO sur 



,ag.-Pré 



ment de l'image - Billard américain - Introductioi 

Animation et gestion de sprites - Tout sur les fichie 

CPC 

CPC n" 34 : Notions en mémoire - Traitement de I 

sidentielles - CAO 3D - Introduction à G.S.X. Touf 

chiers - Animation et gestion de sprites - Oil Panic 

CPC n° 35 : Du 464 au 6 1 28 - 5" 1 /4 j'en veux - Traitement 

de l'image - CAO 3D - Rolling Slones - Mélange des couleurs - 

Conversion ASCII binaire - Moniteur de disquettes 

CPC n° 36 : Faites-vous bonne impression ? - Traitement de 
l'image - Banderole - CP/M + sur 464 - Médor - Accélérateur - 
Satellite - CAO 3D - Ré numérotai on des programmes binaires 
- Compilation BASIC/Binaire - Amslettres 
CPC ti° 37 : Catalogue détourné - Anlalex - Téléchargement - 
Vidéo - Amslettres - Traitement de l'image - DAMS et CP/M- 
Anti-erreurs- Zoomer - CAO 3D - Tromeur - Sprinter 



CPC n° 38 : Dossier : les fonzin< 
de l'image- Digison - CAO 3D. 



- Perestroïka - Traitement 



DISQUETTES 

• CPC 

1 disquette contient les programmes de 2 numéros 

consécutifs de CPC. 



1 : CPC 1 et 2 
2 : CPC 3 et 4 
" 3 : CPC 5 et 6 
* 4 : CPC 7 et 8 
° 5 : CPC 9 et 10 
°6: CPC 11 et 12 
°7:CPC 13 et 14 
°8 :CPC 15 et 16 
°9 :CPC 17 et 18 
° 10: CPC 19 et 20 



'11 : CPC 21 et 22 
1 12: CPC 23 et 24 
s 13: CPC 25 et 26 
• 14; CPC 27 et 28 
' 15 : CPC 29 et 30 
■ 16: CPC 31 et 32 
3 17: CPC 33 et 34 
" 18 : CPC 35 et 36 
3 19: CPC 37 et 38 



Les disquettes Hors Série contiennent les program- 
mes du numéro correspondant. 

HS 4 : Edit 2 - France rivière - Boisson assistée par ordinateur - 
Histoire de France - Gaston - Minic Mac - Opération Oméga. 
HS 6 : Flipper - Calcul Mental - Auto-choc - Jaquette - Dra- 
peaux & capitales - Nuclecr - Biorythmes. 
HS 7 : Anti-erreurs - Dominos - Départ Oie - Trait-Stal - AIca - 
Impression sur enveloppe - Auto dictée - Manoir Maudit. 
HS 8 : Anti-erreurs - Musiques - Mots croisés - Reliefs Mathé- 
matiques - Prêt - Resistor - Division - Le petit train - Magnelic - 
Pousse-Pousse. 

HS 9 : Anti-erreurs - Turbo Clavier - The Intruder - Surface - Le 

cerveau - Btue-Cards - Coulmélo. 

HS 10 : Agenda - Titreur - Skyhawk - Packy - Volumes - Musi- 

ca. 

HS 1 1 : Ulcinor - Mots Codes - Puzzle - Centipède - Gestion 

Automobile -Chimie, 

HS 12 : Amsboggle - Energix - Lotin - Mission - Problèmes - 

Registre. 

HS 1 3 : Alpha-Strip - Tables de multiplication - Ortho-Chiffres 

- Ams'orgue - Contact - Discover. 

HS 1 4 : Traceur de Fonctions - Tri - Météo - Croque - Mission - 

Listing couleur - Satanio. 

HS 1 5 : Electron - Fleur - Danger • Horloge - Laby - Impression 

d'enveloppes - La roue. 

HS1 6 : Dork Dungeons - Skin'Egg - Titreur - Mines - Ortho - 
Loup - Grenouille - Manureva - Opérations à trous. 

• ANCIENS NUMEROS CPC DISPONIBLES 

n° 10, 11, 13, 16, 18, 19, 20, 23, 24, 25,26, 27, 28, 29, 
30, 3 1 , 32, 33, 34, 35, 36, 37, 38 25 F la revue 

• HORS SERIE DISPONIBLES 

n° 4, 6, 8, 9, 1 0, 1 1 , 1 2, 1 3 1 4, 1 5, 1 6 _ 1 5 F la revue 

• DISQUETTES 

n° 1, 2, 3, 4 5, 6, 7, 8, 9, 10, 1 1, 1 2, 13, 14, 15, 16, 17, 
18, 19, HS1, HS2, HS3, HS4, HS5, HS6, HS7, HS8, HS9 
HS10, HS11.HS12, HS 13, HS14, HS15, HS16 

Abonné 



_1 TO F la disquette 

_ 140 F la disquette 

600 F 




CPC" 



*5? 

411 v 



il ÎJ là. 




AMSTAR 



CPC 



BONDE 
COMMANDE 



ANCIENS NUMEROS 



( ^25 F la revuej ) 



AMSTAR & CPC 26 : 



:s d'essais logiciels- Catalogue détourné -Listings en binaire -Tromeur- Traitement de l'image 
Solution : Crash Garrett- Ça ne marche pas - List -Vidéo - Amslettres - Reportage : Cobra Soft. 

AMSTAR & CPC 27 : Mettez un peu d'animation -Vidéo -Amslettres -Solution : Conspiration - Le retour des fonzines- 
Edifeur de jaquettes - Bancs d'essais logiciels. 

AMSTAR & CPC 28 : Technique des masques- List -Traitement de l'image- Vidéo -Architecture et composition des RSX 
Plan : Jack the Nipper 2 - Boncs d'essais logiciels - Listing : Xénon. 

AMSTAR & CPC 29 : Vidéo - Xénon - La revanche du retour des fanzines - Plan : Sky Hunier - Dossier éducatifs - A la 
découverte du clavier - Fraclal Landscope. 

AMSTAR & CPC 30 : Vidéo -Téléchargement - Atomic Satellit- CAO 3D - Solution : A320 - A la découverte du clavier 
Trucages de codes BASIC - Analysons les fichiers - Boncs d'essais logiciels. 

AMSTAR & CPC 31 : Fanzines & cie - Compact - CAO 3D * Atomic Satellit (suite) - Téléchargement - Solution ; l'Ile - 
Etoiles - Réduction de code BASIC - Puissance 4 - Double Mode - Dossier : les indispensables de 
votre logithèque - Bancs d'essais logiciels. 

AMSTAR & CPC 32 : Fanzines en folie - Listing ; Créations musicales - Etoiles (suite) - Traitement de l'image - Bancs d'es- 
sais logiciels - Solution : Secret Défense - Le coin des affaires - Compact (suite] - Routine de tri - 
Listing : Solitair - Trucs et astuces. 

AMSTAR & CPC 33 : Boncsd'essais logiciels - Le coin des affaires - Les fanzines - Horloge - Trucs et Astuces - Molécules - 

CAO sur CPC - Astuces : R-TYPE - Fruity- Tri -Récapitulatif CPC N° 30 à 38 - Récapitulatif AMSTAR 

N° 19 à 25. 
AMSTAR & CPC 34 : Bancs d'essai logiciels- Reportage : Génération 5 - Les Fanzines -Couleurs- CAO sur CPC - Listing : 

Puissance 4 - Listing : Billy II - Compacteur - Caractères - Anti-erreurs - Disquettes système - Trucs 

et astuces - Récapitulatif Astuces et Pions Amstar. 



[Abonné 110 F la disquette 

}^ Non-abonné — 140 F la disquette 



l disquette contient les programmes de deux numéros consécutifs d'AMSTAR & CPC. 

N° 20 : AMSTAR & CPC 26 et 27 - N° 2 1 : AMSTAR & CPC 28 et 29 - N° 22 : AMSTAR & CPC 30 et 3 1 - N° 23 : AMSTAR 

& CPC 32 et 33 - N" 24: AMSTAR & CPC 34 et 35. 



Pour faire votre commande, veuillez remplir 
le bon de commande P. 98 



ï OïA£ SB' £ C 09$MM9$p e E A expédier à . 5QRACOM EdiHoni - La Haie de Pan 35 1 70 BRUZ 



Désignation 



LSS 



Pour chaque article, entourez le ou les n° choisis. 
ANCIENS N" AMSTAR & CPC 

N° 26 - 27- 28 - 29 - 30 - 31 - 32 - 33 - 34 

DISQUETTES AMSTAR & CPC 

N° 20 - 21 - 22 - 23 - 24 (Une disquette réuni: 2 numéros consécutils tf Amstar S CPC) 



16-17-18-19-20-21 
22 - 23 - 24 - 25 

DISQUETTES AMSTAR 

N° 1 {du n° 1 au B inclus) - N" 2 (n° 9 au 16 inclus) 
N° 3 (n° 17 au 25 inclus) 

ANCIENS N" CPC 

N" 10-11-13-16-18-19-20-23-24-35-26-27-28-29-30 
31-32-33-34-35-36-37-38 

ANCIENS N" HORS SERIE CPC 

N° 4-6-8-9-10-11-12-13-14-15-16 

DISQUETTES CPC ET DISQUETTES HORS SERIE CPC 

N° 1-2-3-4-5-6-7-8-9-10-11-12-13-14-15 
16-17-18-19. (Une disquelle CPC réunit. 2 numéros consécutifs de CPC) 
HS1 - HS2 - HS3 - HS4 - HS5 - HS6 - HS7 - HS8 
HS9 - HS1 - HS1 1 - HS1 2 - HS13 - HS14 - HS1 5 - HS16 

ABONNEMENT 6 DISQUETTES 

DISQUETTE "ARCADES" 4 câble [Nouvelle Edition) 

[Kit Téléchargement AMSTRAD CPC] 



Abonné 
Non-abonné 



Logiciels éducatifs - Livres - Divers 



Désignation 



110 F (unité) 
140 F (unité) 



lSFfw 
1 8 F fur 
20 F ;u: 
22 F h 



HOF/un/réj 
140 F lunitél 



600 F 
112F 






Forfait port ♦ 1 F par loglclal et 1 % pour livres 



J Facultatif : recommandé + 10 F par commande 
MONTANT GLOBAL 



Je joins mon règlement chèque bancaire □ chèque postal □ 



Date et signature 









N° Ri m 








Commtntit La commande dort comporter tous las renseignements demandés sixte bonde commande (désignation ou rélérence si celle-ci existe) Tome absence de précisions est sous la responsaii- 
Ln prix Les prix indiqués sont valables du jour de la parution du catalogue jusqu'au mois suivant ou au jour de parution du nouveau catalogue, saul erreur dans le libellé de nostariîs au momenl de la 

LWralaon La livraison RM ■vient aa'és le réglens-t Les oélas ce livra son étant de '0 à '5 jo-rs environ. SOOACOM ne pourra être tenue pour responsable des retards dus aui transp odeurs ou aui 
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16 PAGES D'ASTU 




Ofc^Mâ% 



ACTUALITE 



REPORTAGE : 
LORICIEL 



z LE LOGICIEL DU MOIS 



• GRAND CONCOURS 



M AVANT-PREMIERE : 
î SILKWORM 



LISTING : COSMOS ! 



IL COURT, IL COURT 
LE FANZINE 



TRANSMOD 



CAO SUR CPC 



BULLETIN 
D'ABONNEMENT 



BANCS D'ESSAI 
LOGICIELS 



SOLUTION : 

LE MANOIR 

DE MORTEVIELLE 



POSTER 



LE COIN 
DES AFFAIRES 



RECAPITULATIF 

AMSTAR & CPC 

(N° 26 à 34) 



BANC D'ESSAI 
UTILITAIRE 




APPRENONS 
A PROGRAMMER 



LISTING : FORMATEUR 



LISTING TRUQUE 



ANTI-ERREURS 



DOSSIER : VOUS 
AVEZ DIT ASTUCES ? 





Alors que le troisième épisode de la série 
Indiana Jones (The Last Crusade) marche 
de Zeus aux Etats-Unis, Lucas- 
film Games annonce une version informatique 
du délire filmique de Spielberg et Lucas. Et com- 
ment c'est-y qu'il s'appelle le logiciel ? The Last 
Crusade, bien entendu. On devrait d'ailleurs plutôt 
parler des logiciels puisqu'il s'agit de deux program- 
mes, un jeu d'aventure et un jeu d'arcade qui verront le 
jour et porteront le même titre, préférant ne pas mélan- 
ger les genres et obtenir ainsi un résultat médiocre, Lu- 
casfilm a opté pour deux philosophies différentes. Les 
jeux retracent la jeunesse de notre aventurier préféré et 
la capture de son père par les nazis. Tout cela pour une 
histoire de Graal à retrouver et qui permettrait à Hi- 
tler de dominer le monde pendant mille ans ( dites- 
donc Spielberg et Lucas il est temps d'arrêter les 
champignons hallucinogènes). Le jeu d'action 
sortira le premier en juillet normalement. Le 
kiwi n'est pas seulement un fruit exotique 
vert et vitaminé, c'est également (ou c'était) 
un oiseau bizarre tout petit et qui ne peut 
voler. Eh bien dans New Zealand story 
êtes un petit kiwi, surnommé Joey, 
qui part à la recherche de sa famille au 
long des 60 niveaux du jeu. 



MlCROIDS 

Encore un! C'est la deuxième 
fois que Microids rafle un 
C.E.S Award. Cette récom- 
pense américaine a été décer- 
née à Chicago pour le logiciel 
Downhill challenge autre- 
ment dit Super Ski pour les 
bons français que nous 
sommes. Vous voyez bien 
que l'on peut en remontrer 
même aux Américains 
dans le domaine des pro- 
duits innovants. 




* smsfm 
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Titus 



Puisque nous sommes dans les 
récompenses, Titus fait aussi dans la 
création. Titan a reçu, toujours à 
Chicago, un oscar de l'innovation 89. 
Allons bon mais les éditeurs français ne 
vont rien laisser aux pauvres 
américains ? 



N'OUBLIEZ PAS ! 

AMSTAR & CPC 

SORT AUSSI 

EN AOUT ! 



Mandarin 
software ■ 



Une intéressante étude portant sur 
le stress des cadres en entreprise et 
principalement sur i es moyens 
employés pour évacuer cette 
tension a été menée en Angleterre 
pour le compte de Mandarin. O 
surprise c'est le jeu sur micro qui 
remporte le plus de suffrages 
devant l'alcool, les cigarettes et le 
sexe. 500 cadres ont ainsi eu à leur 
disposition la simulation Lombard 
Rally pendant 3 mois. Alors, à 
quand les logiciels de jeux 
remboursés par la Sécurité sociale? 



MSTRAD 464I664I612S_ 





m kixx 




La deuxième compagnie anglaise de 
budget (après Code Masters) annonce 
Gauntlet II, Masters of the universe, 
Jack the Nipper, Mission Elevator et 
Cybernoid. Bref des classiques à un prix 
exceptionnel. 



Encore 



Continuons dans la catégorie «prix 
légers» avec un spécialiste de ce genre 
de produits qui annonce gaillardement 
quelques nouveaux titres. Par exemple 
Bomb Jack II ou 1942, succès d'arcade 
de notre jeunesse enchanteresse. Il y a 
aussi Kokotoni wilf qui semble être un 
mélange d'arcade et d'aventure avec 
dragons et tout le bastringue de 
l'heroic-fantasy. 



Disquettes 



Peut-être en avez-vous déjà fait les 
frais : une pénurie de disquettes 3" se 
faisait sentir depuis quelques mois à la 
suite d'une fermeture d'usines. Mais 
heureusement, la société CTS s'apprête 
à inonder le marché français à partir 
d'une usine basée en Italie. Alors, finie 
la pénurie ? 



AMSTRAD 



464/664/6J28 




Océan 



Chez Océan, tout baigne : ils ont décidé 
d'imiter les petits copains et de sortir 
eux aussi une gamme «budget» 
réunissant leurs anciens titres puisque 
comme dit le proverbe : «c'est dans les 
vieux chaudrons que l'on fait les 
meilleures soupes». La collée s'intitule 
Hit Squad et elle est divisée en 3 
genres : Sports collection. Arcade 
collection et Movie collection. Quelques 
titres au hasard : Enduro Racer, Rambo, 
Daley Thomson's décathlon, Green 
Béret, Miami Vice, Yie ar kung fu. 



35° à l'ombre ! 

Le ranch est en vue ! 

L'aventure peut 
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LORICIEL 




Le secret est enfin dévoilé 



Démonstration du West Phaser par Laurant. Weill 



La matinée est déjà bien avancée 
et le soleil nous arrose copieuse- 
ment de ses cruels rayons lorsque, 
soudain, nous apercevons le ranch en haut 
de la colline. Encore quelques minutes de 
marche laborieuse (sans chapeau et sans 
gourde) et nous pénétrons dans ce havre 
de fraîcheur et de paix qui semblent ré- 
gner sous ce toit. Toute l'équipe «Lori- 
ciel» est présente, le shérif Laurant Weill 
et ses adjoints Marc Baylc et Philippe Sé- 
ban ainsi que de nombreux cow-boys... 
dont certains sont de charme ! Tout le 
monde ayant pris place, après s'être bien 
assuré qu'aucun intrus ne se trouvait dans 
la place, nous allons enfin tout savoir... 
Sur la table centrale se trouve une caisse 
«Top Secret - Défense de Toucher» qui, 
évidemment, contient tous les plans qui 
vont nous être dévoilés... 
Mais, soudain, en une fraction de seconde, 
le drame se produit ! Une horde de hors- 
la-loi fait irruption dans le ranch et nous 
intime l'ordre de ne pas bouger, de lever 
les mains et surtout de ne pas essayer de 
jouer au héros. Leur objectif est, bien en- 
tendu, de subtiliser cette caisse secrète et 
de nous enlever sous notre nez ces plans 
dont nous attendions la révélation depuis 
si longtemps et que nous allions enfin dé- 



couvrir ! Mais, alors que le chef de la bande 
a presque réussi à s'emparer de la boîte, 
la bonne étoile de Loriciel intervient en 
la personne du Bon, Sauveur de Loriciel. 
Après être lestement descendu de son che- 
val, il fait si vite le ménage parmi les brutes 
qu'il ne reste plus à leur chef qu'à se faire 
hara-kiri... La caisse contenant les plans 
de Loriciel retrouve alors sa place initiale 
et Laurant Weill soulève délicatement le 
couvercle... 

REVELATION 
DES PROJETS 

$ÊÈF D'emblée, nous comprenons pour- 
JÏ^ quoi tous les coyotes du Far West 
>£/ étaient si désireux de s'emparer 
du projet ! En effet, il s'agit d'un pistolet 
«révolutionnaire», le WEST PHASER, qui 
peut fonctionner avec tout type d'ordi- 
nateur. D'une part, West Phaser est un 
pistolet interactif livré avec un jeu d'ar- 
cade où vous incarnez un justicier de 
l'Ouest à la recherche des plus grands 
bandits d'Amérique ; d'autre part, West 
Phaser c'est toute une gamme puisque de 
nombreux logiciels seront adaptés tels que 



Space Racer par exemple. Dans cette op- 
tique, des contrats ont déjà été signés avec 
des sociétés comme Info gr âmes, Cobra 
Soft ou Actionware. Tout logiciel faisant 
partie de la gamme sera facilement recon- 
naissable grâce au logo Phaser Compati- 
ble qui sera présent sur chaque embal- 
lage. Enfin, le produit West Phaser vous 
permettra également de programmer vos 
propres jeux en GFA Basic, Basic ou As- 
sembleur suivant la machine que vous 
possédez. 

Visiblement, toute l'équipe Loriciel se sen- 
tait maintenant libérée du grand poids 
que constituait ce secret et c'est d'un cœur 
très léger qu'elle nous faisait une démo 
de West Phaser sur PC (concluante sur 
PC en CG A ce qui laisse augurer de bons 
résultats sur les autres machines) avant 
de nous présenter les 2 autres logiciels 
qui sortiront également au mois de sep- 
tembre, sachant que ces 3 logiciels font 
partie des 8 prévus pour la fin d'année. 
Il s'agit tout d'abord d'une simulation de 
Kick Boxing, réalisée en collaboration 
avec André PANZA, Champion du Mon- 
de de Kick Boxing, de Boxe Américaine 
et de Boxe Française (titres malgré tout 
quelque peu frappants !). Dans votre com- 
bat mené contre plusieurs opposants jus- 




Pinbatl Magic sur Atari ST 



Pinball Magic sur Atari ST 



qu'à l'affrontement avec Paiiza lui-même, 
Loriciel veut des mouvements aussi par- 
faits que possible et c'est pourquoi ils ont 
tous été pris en vidéo puis décomposés 
et digitalisés... Le dernier logiciel présen- 
té aborde un tout autre domaine mais 
nous sommes persuadés qu'il va en pas- 
sionner plus d'un ! Bien que Pinball Ma- 
gic traite un thème hyper-classique, il a 
l'avantage de présenter de nombreux ta- 
bleaux dont certains comprendront des 
casse-briques et d'autres des flippers. Pré- 
sentant des graphismes très colorés et un 
intérêt évident, il vous promet sans pro- 
blème de longues heures devant votre 
écran... 




Tableau final 



Maintenant qu'il n'y avait plus de 
;t, tout le monde était invité 

à faire la fête ! Seulement, à votre 
, avons-nous dévoilé tout ce que nous 
avons appris ? Les plus observateurs d'en- 
tre vous ont sans doute déjà découvert 
que non ! En effet, jusqu'à présent, nous 
avions l'habitude d'écrire Loriciel avec un 
«S» ; mais non, ce n'est pas une faute de 
frappe ou un oubli car cette journée a été 
également marquée par la perte officielle 
du <&•> et la présentation du nouveau 1 



Le petit chaton sur la scène du logiciel 
depuis bientôt 6 ans a donc décidé de de- 
venir plus dynamique et plus actuel pour 
accompagner la sortie de nouveaux pro- 
duits qui se veulent originaux et de qua- 
lité. Pour en juger, il suffira d'attendre le 
dernier trimestre qui, comme chaque an- 
née, va se révéler très prolifique. 



iLORÏCIEl 



•epoorlonesotne 
joumalists... 
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Stormlord 



Elles sont pa 

je suis aussi à la recherche de ces petites créatu- 
. Si je comprends bien le scénario, ces 
ont été capturés par une Reine mé- 
' equecelledeBlanche-Neige, 

ission en tant que Stormlord 

les fées afin c 



sa 



m 



«a 1 ::». 




■■1» 

raHlHTOl 



passer. Ouf, c'est f. 



Wïïm^^m 



pour accéder à un I 
projettera littéralement dans les étoiles jusqu' 
de détention de la gentille fée. Ci 
plin et me voici dans un nou\ 
: le précédent. On peut repé 




auches féroces (si,si>. Il va falloir déposer 



libérer l'entrée de la grotte. Il n 

nir sur mes pas et à utiliser un autre tremplin vers 

un niveau plein de bruit et de fureur où il faut tii 



bien entendu réussi ma i 



nîfJTtffl 



petites fées volent au-dess 
envoyer de peti 
ser des lar 



ai droit à une vie suppléments 



Le royaume de Stormlord est vraiment merveilleux 
(à moins que ce ne soit celui de Raïaells Cecco, 
coauteur du programme) : Des couleurs magnifi- 
ques, des graphismes détaillés, des personnages 
attachants {surtout les fées!) et des animations ré- 
ussies. La musique n'étant pas à jeter et la diffi- 
culté du jeu justement dosée entre facile et pas 
évident, ne vous étonnez pas que Stormlord soit 



logiciel du mois. 

oooo 
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é par : Hewson 
indicatif: K7,99F 
DK, 149F 
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GRAND a 

CONCOURS 

>PERMANENT < 



Dans notre numéro d'avril, vous avez pu découvrir un banc 
d'essai complet de Highway Patrol. Depuis vous avez eu 
largement le temps de vous familiariser avec cet attrayant jeu 
d'action aventure en 3D qui vous offre une simulation 
de conduite avec, en prime, de folles poursuites . . . 
Maintenant, il ne vous reste plus qu'à remplir le questionnaire 
ci-contre entre 2 séances de doigts de pied en éventail ! 
Avouez que le premier prix en vaut la chandelle. 





^ 



1er prix : 1 radio-réveil-lampe orientable GO-FM 
Du 2ème au 5ème prix : 3 logiciels Microïds 
Du 6ème au lOème prix : 2 logiciels Microïds 
Du llème au 20ème prix : 1 logiciel Microïds 



Quel est le thème du jeu ? 



Quel est l'objet livré avec le logiciel et qui se révèle être indispensable à votre 
folle poursuite : 



Donnez l'objet du délit : 



Comment s'appelle l'arme à feu plaquée sur le tableau de bord ? 



Question subsidiaire : 

Donnez le nombre de bulletins comportant toutes les bonnes réponses que nous 
recevrons. 



(en cas d'ex aequo, un tirage au sort sera effectué) 



Renvoyez ce questionnaire à CONCOURS MENSUEL AMSTAR 
Editions SORACOM - B.P. 88 - 35170 BRUZ 

Aucune photocopie ne sera acceptée. Pour le mineur 
gagnant, l'autorisation des parents sera nécessaire. 2 



DERNIER DELAI LE 15 AOUT 1989 




Adresse 

Code postal 



- . Ville . 




Signature : 

Si je gagne, je voudrais mon lot sur : 
W^-\ û K7 □ DK 



]0m : immm^im>m- 




Le ver à soie, c'est le titre du logiciel 
^ que voici que voilà. On pourrait croire 
qu'il s'agit d'une paisible fable destinée 
à nous asséner une morale pleine de bon 
sens ou bien qu'il s'agit d'une simulation 
d'élevage de ces charmantes petites bes- 
tioles friandes de feuilles de mûrier. Eh 
bien non, c'est encore une boucherie sans 
nom, un de ces logiciel ou l'instinct sau- 
vage de la bête immonde cachée en nous 
est plus sollicité que l'intellect sublimé 
de l'homme moderne. 



Pour vous situer l'époque, on en est à la 
4eme guerre mondiale et le monde com- 
mence à grand-peine son rétablissement 
vers une paix durable. 



Mais comme on n'est jamais trop prudent, 
les grandes nations décident de signer un 
traité abolissant les armes nucléaires. 

On peut alors penser que le monde va 
souffler un peu et que l'on va pouvoir se 
délecter du chant des petits oiseaux. Pas 
du tout, les vilains généraux, avec pleins 
de méchantes armes ont encore envie de 
s'amuser. 

Et quoi de plus amusant qu'un bon coup 
d'Etat militaire ? Devant la menace et les 
hordes de véhicules de toutes sortes qui 
commencent à déferler en vagues meur- 
trières et belligérantes, les civils ont con- 
çu deux engins de guerre : un hélicop- 
tère et une jeep. 

Cela peut sembler un peu juste pour 
contrer la vague précédemment nommée 
mais il faut préciser que ces véhicules 
bénéficient des derniers perfectionne- 
ments en matière d'armes offensives. 

11 ne reste plus qu'à trouver les deux cou- 
rageux volontaires qui accom- 
pliront cette mis- 



sion suicidaire. Les volontaires étant dé- 
signés, il est possible de commencer. L'hé- 
licoptère du premier joueur possède deux 
canons : l'un est dirigé vers l'avant, l'au- 
tre est incliné de 45 degrés vers le bas et 
permet de défendre la jeep en cas de be- 
soin. Justement, la jeep ne possède qu'une 
seule arme mais son canon est orienta- 
ble et elle peut également sauter par- 
les obstacles. 

Parmi les ennemis rencontrés on trouve 
des hélicoptères, des tanks, des avions et 
autres véhicules plus ou moins blindés. 
Certains ennemis reviennent régulière- 
ment comme l'hélico à coup d'oie (comme 
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lirait Yannick Noah) dont les différen- 
ts parties tourbillonnent devant vous 
ivant de se rassembler. 
C'est là qu'est justement son point faible : 
m morceau particulier est vulnérable à 
/os attaques. 



1 suffit de s'acharner dessus poui 
sauter le bazar et récolter bonus < 
nés supplémentaires. 






Autre petite chose intéressante : vous trou- 
verez parfois sur le sol des pastilles rouge- 
orange. D'un tir vous pouvez les détruire, 
elles révéleront un nuage de gaz. 

En vous positionnant sur ce nuage vous 
récolterez une protection temporaire. Et 
s'il y a deux nuages présents à l'écran, le 
second se comportera comme une «smart- 
bomb» et clétruira tous les ennemis pré- 



Et un shoot'em up de plus dans la collection du CPC. Parmi les défauts de Silk- 
worm on notera une animation cahotique, une difficulté désarmante et un scéna- 
rio archi-connu. En revanche les graphismes sont plutôt jolis, il est possible d'acti- 
ver un mode spécial permettant une animation plus rapide mais réduisant l'affi- 
chage à une ligne sur deux. 



sents sur l'écran (sauf l'hélicoptère à coup 
d'oie). 

Enfin à la fin de chaque niveau, un des 
généraux vous attendra à bord d'un hé- 
licoptère ou d'un tank lourdement armé 
et blindé qu'il faudra toucher plusieurs 
fois avant de le détruire. 

Edité par : Virgin Games 

Prix indicatif : Non communiqué 
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Un vaisseau venant ■ K J|. m yp 

d'une autre galaxie se 
trouve en mission 




d'une autre galaxie se 

trouve en mission 

d'exploration dans 

l'infini cosmos. 

Malheureusement, des 

chasseurs, des pièges 

l'attendent. 



Après le chargement, l'utilisa- 
teur pourra sélectionner soit 
le clavier {touches direction- 
nelles + barre) soit le Joystick en ap- 
puyant sur la touche 1 , Pour commen- 
cer, pressez la touche 2. 
La pause s'obtient en appuyant sur 
RETURN. L'abandon s'effectue par l'In- 
termédiaire de ta touche ESC. 
Au début du Jeu, vous avez 3 vies. Au- 
cune vie supplémentaire ne sera ac- 
cordée durant la partie. En revanche, 
le vaisseau dispose d'une réserve de 
missiles Inépuisable. 
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Il y a 3 fichiers : COSMOS.BAS qui est 
le programme de chargement, DA- 
TAS1 et DATAS2. Ces 2 derniers pro- 
grammes doivent être jancés en pre- 
mier car ils créeront deux fichiers bi- 
naires COSMOS1 .BIN et COSMOS2.BIN 

Luc & Hervé GUILLAUME 
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>> Projraued bv Luc bmllauje 
i» Graphics by riewe Ûuiliauie 
it Copyright Black Syat'ei 136S 

100 ' 

120 HEHÛfiï 19999 

130 LOAD" IC0SH051.BIN", 30000 

140 LÙAD" ? CDSMÛS2. B IN", 2Û0ÛÛ 

150 CALL 30000 



DATAS 1 
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20 ' DATAS POUR C0SHQS1.BIN 

M) • 

40 MODE 2:AÛ=30000:NL=110 
50 FOR B=l TO 510:T0T=Û:F0fi T=0 10 U:fi£AD At 
60 POKE AD,VALi , V*Ai):TOT=TOT<PEEK(AD):AD=AD+l 
70 NEXTjREAD SOM*:IF «MLCV+SOSiKiTOT THEN 100 
BO LÛCATE l,l:PRINT"LIGNE";NL;"CÙRfiECTE" 
90 NL=HLtlÛ:HEÏT:àAI/E"CÛSM0Sl.BIN , ,B,4753Ù,i 1 lE14:EhD 
100 LOCATE l ( i:PR]NrLIGNE"(HL;" INCORRECTE" :END 
110 DATA 31, 00, CO, CD, 15, B9,7C,F£, 02^,41,75,21,30,60, 6 
120 DATA 36,C9,21,E£,BD,36,C9,06,0Q,ÛE,Oû,CD,36,BC,CD,6 
130 DATA EE,81,AF,CD,0E,BC,21,5D,EB,22.B7,87,3E,Û1,32,6 
140 DATA B6,B7,21,EE,8e,ll,E4,E2,CD,94,Bl,21,0i,89,ll,7 
150 DATA e2,EB,CD,94,81,21,l6,B9,ll,24,FC,CD,94,Bl,CE),7 
1Ë0 DATA BO, 84, CD, FF, 61,AF ( 32,2B,B6,32,3C, 88, 32, 4D,B6, 7 
170 DATA C0,47,7E,CL.06,77,CD,5D,82,06,06,CD,A5.84.CD,7 
180 DATA 47,7a,CD,E2,7F,3E,2F,CD,lE,BB,CA,93,75,ûe,64,7 
190 DATA CD.A5, 84, CD, EE, 81, 21, 4D, E9,22,B7,87, AF.32,B3,B 
200 DATA B7,3E,01, 32, 82,87,21, 30, 89, 11,0F, 68,01. 03, 00, 4 
210 DATA ED,B0,CD,B2,89,CD,EE,8t,AF,CD,QE,BC,AF,32,2B,9 
220 DATA S6,32,3C,86,32,4D,86,CD.47,7E,21,A4,50,U,1A,5 
230 DATA D8,Oi,19,00,3E,19,CD,C2,B1.21,20.88,06,03,5E,4 
240 DATA 23,56,23,C5,CD,94,81,Cl,10,F5,21,5E,&e,Q6,02,6 
250 DATA 5E.23,56,23,C5,CD,66,81,Cl,lO,F5,06,0A,CD,A5,6 
260 DATA 84,CD,FF,81,3E,41,CD,1E,BB,C2,98,76.3E,40,CD,8 
270 DATA 1E,8B,C4,49,76,CD,2B,76,C3.15,76,CD,D6,77,2A,7 
280 DATA 32,B6,E5,11,AC,DQ,Û1,ÛA,00,3E.16,CD,2F,81,E1,5 
290 DATA U,D6,D0,01,QA,00,3E,16,C3,2F,B1,3E,40.CD,1E,4 
300 DATA BB,C2,49,76,3A,B2,B7,3C,FE,03,DA,5C,7G,3E,01,6 
310 DATA 32, B2, 87, FE, 02, CA. 75, 76, 21, 90,89, 11,0F, 88,01, 6 
320 DATA 03, 00. ED.BO.21.B4, 88, 03,83,76,21,95, 89, 11,0F, 6 
330 DATA 88,01,Û3,OQ,ED,BO,21,C4,88,E5,ll,25,88,01,iO,5 
340 DATA 0O,ED,B0,El,U,DA,FB,CD,94,81,OË,32,C3,A5,84,8 
350 DATA CD,EE,81,AF,CD,0E,BC.21,A4,50,11,6B,CÛ,01,18,6 
360 DATA 00,3E,19,CD,2F,B1,21,8C,B8,11,54.EO,CD.94,B1,6 
370 DATA 21,96,88,ll,A4,E0,CD,94,81,21,AO,88,ll,BB,E0,i 
380 DATA CD,94,B1.21.AA.B8,11,D8,EO,CD,94,81,06,04,21,7 
390 DATA 9A, 89, C5.5E, 23, 56, 23. £5, 21, 04,88, CD, 94,81, El, e 
400 DATA C1,10,FO,3E,03,32,CC,B7,C6,30,32,43,89,21,00,S 



410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 
550 DATA 
560 DATA 
570 DATA 
580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 
740 DATA 
750 DATA 
760 DATA 
770 DATA 
780 DATA 
790 DATA 
800 DATA 
810 DATA 
820 DATA 
830 DATA 
840 DATA 
850 DATA 
360 DATA 
870 DATA 
880 DATA 
890 DATA 
900 DATA 
910 DATA 
920 DATA 
930 DATA 
940 DATA 
950 DATA 
960 DATA 
970 DATA 
980 DATA 



00,22,C9, 
B5,B7,C3, 
Cl, 87,21, 



7F, f 



87, CD, FF, 
82,CD,D8, 
3A, 39,86. 
6A,7B,3A., 
1E.BB.C4. 
82.3E.42, 
CD,8C,7F, 
44, 77, CD, 
21,CF,87, 
3E,01,32, 
64,00, ED. 
F1.77.C9, 
87,21, DC. 
3E, 01,32. 
CD.47.7E. 
11,D0,D4, 
A5,64,CE>. 
8E,FB,CD, 
32,B6.87. 
06,0C,C5. 
7B,AF,DD. 
C9,3A,3C, 
36,86,3C. 
01.C8.3A, 
86,C6,08. 
86,06,02, 
7E,OC,06. 
Q2,DD,77, 
3A, 36,86. 
3D,3D,FE, 
DD,7E,00. 
FF,DD,2B. 
3C,79,ED. 
21,0A,B8, 
F8,2A,C9. 
81,C5,D5, 
01.4A.4E. 
Dt.Cl.DD, 
CS,DD,E5. 
0D,21,BD, 
DD, 74,08. 
11,00, DD, 
DD,7E,00. 
79,DD,7E, 
79.DD.36. 
BC.DC.EB, 
21.2A.B7. 
FA,79,FE, 
DD.21.2A, 
C5,DD,E5, 
FE ( O0,CA, 
7E.0C.C6, 
FE,B9,DA, 
El, Cl, 11, 



87, 21.CF, 87,22. 
28, 77, 21, 5F, 69, 
88, 89,22, C7, 87. 
C5,B7,21,6B,B9. 
B1,CD,5D,B2.CD, 
7E,CD,BE,84,3A. 
FE,00,C2,8E,7C. 
0F,88,CD,1E,BB. 
DE, 78, CD, D6, 77. 
CD,1E,BB,C2,CB, 
3A,B5,87,FE,01. 
BE,B4,2A,BF,B7. 
22,BF,87,3A,CC. 
CB.87,C9,32,CC. 
5fl, 87,87,01,33 
3A,B3,87,X,FE, 
00,CD.08,86,01 
B6,87,AF,32,2B 
21,29,89, U,BE 
CD, 94, 81, CD, BO. 
47,78, CD, E2, 7F 
66,81,21,33,89. 
3E,01,32,2B,86 
DD,E5,DD,7E,0C. 
77. OC, DD. El, Cl 
B6,FE,01,CA,83, 
32,47, 66, 3E.8C 
48. 86, FE, 78.00 
32,5B,86,3E,6C 
C5,DD,E5,DD,7E r 
04,90, FE, 04, D2 
OC, DD,E1, Cl.lt. 
,3C,3C,FE,21,[H) 
07,08,32,36,86. 
FE,OA,38,09,OE 
10,EC,DD,21,GA. 
,5B,C9,87, 21,20 
11, AC, 88,06, 05. 
.87,22,15,79,21 
DD,E5,D5,DD,7E. 
09, Dl, 01, 02, 00. 
23,13, 13, 10.DB, 
DD,7E,0D,3C,FE. 
00,CD,08,B6,ED h 
DD,7E,0E,FE,00. 
19,10,CD.DD,21, 
FE,00,CA,D5,79. 
0C,C6,06,FE,B9. 
O0,OO,AF,DD,77. 
79, DD, El, Ct, 11, 
06,04,C3,DC,7C. 
06,CA,FA,79,DD, 
87,06,06.C3,0D. 
2A,BD,87,DD,75. 
48,7A,2A,BF,S7, 
08,C3,37,7A,DD, 
48,7A,FE,C3,D2. 
U,00,DD,19,10. 



21.7A.89. 
22,BB,87, 
FI, 77. CD. 
CB,87,FE, 
3A, 11,88, 
C4,D2,78. 
3E,12,CD. 
75,CD,A2, 
CA.2F.7F. 
2B,7E,FE ; 
87,3D,FE. 
87.C6.30, 
00,3E,A3. 
02,C2,E0. 
OC, 53,09. 
B6.32.3C. 
FB.CD.66 
84,06, 1E, 
Cl, 10, Ft. 
11,00. 04 
C3.BE.84 
DD, 86,00, 
11,11,00 
78,3E,01. 
32.48,86 
3E,0i,32, 
32,59,86. 
OO.FE.OO, 
C4.78.DD. 
U.ÛQ.DD, 
32,36,66. 
C9,DD,21. 
0A,91,DD. 
83, 11, AS 
<1E,CD,1A 
7E.C6.30, 
AA.88,11 
00,2ï,0E. 
3E,Û7,CD. 
C9,DD,21, 
02.DA.75, 
4B.BD.87, 
C4.3F.7C. 
2A, 87,06, 
D0.7E.0E. 
DA.C8.79, 
OC.FE.IE. 
11,00,00, 
2A,BF,B7, 
35,0B,C9, 
7A.DD.21, 
07,00,74, 
7E,FE,0D. 
7E.0C.C6, 
48,7A,DD. 
BB,DD,21. 



32, CB, 87,32, 6B6 
21, 6E, 89, 22,646 
22, C3, 87,21, 69B 
C9,AF,32,CB,764 
94. 84, CD, 36,990 
01,CA,CB,75,949 
CD,1E,BB,C4,700 
3A, 10, 88, CD, 706 
1E.BB,C4,14,7DB 
78,CD t 47,7B,81D 
CD,E2,7F,C3,8B6 
FF,C2,A9,77,8C2 
00,C2,BB,77,79B 
32,43,89,21,626 
CD,2F,81,CD,649 
77,AF,32,B3,88E 
22,32,86,C9,4EB 
66,32, 4D, 86, 539 
81, 21, 30,89, 69A 

cs.oe.oe.co^sA 

,21,33,69,11,793 
CD, 94, 81, AF, 060 
, 00,21, 5E, 86, 678 
FE,A4,DA,5C,83B 
,DD,19,10,E4,712 
32,3C,B6,3A,5F6 
,3A,4D,86,FE,SCC 
40,86, 3A, 36, 5CB 
C9,DD,21,3C,642 
CA,C7,78,DD,854 
36,00,FF,3E,6B4 
19.tO,D7,C9,6A9 
.C9,3A,36,B6.60A 
: OE, 86,06, 05, 5AD 
,77,00,DD t 34,5B2 
EÛ,ûe,05,CB,7O4 
,82,FE,01,C8,70C 
12.23,13,10,3CF 
,08,E0,C3,94,795 
00,CD,08,86,797 
2F,61,DD,E1,4F6 
2A, 87, 06, 04, 625 
79,AF,DD,77,BF6 
09, DD, 75,07,624 
DD,E1,C1,11,7CF 
04,C5,DD,E5,624 
FE,00,C2,D5.86F 
FE,C3,D2,CB,9D9 
DA,D5,79,FE,7DD 
19.10,C2,DD,B0F 
7E.FE.Û2,CA,6AF 
DD,34,ÛB,C9,87F 
2A, 87,06,04, 4BE 
08,DD,7E,00,B02 
CA,32,7A t DD,7D6 
06,DD,77,0C,GSF 
36, 00,00, DD, 698 
2A, 87, 06, 07, 541 
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990 DATA C3.DC,7C,DD,21.2A,87,06,0fl.C5,DD,E5,2A,BD,B7,7CD 
1000 DATA DD,7S,07,DD,74,OB,DD,7E,OO,FE,OO,CA,94,7A,DD,7CQ 
1010 DATA 7E,OE,FE.O0,C2,94,7A,DD,7E,0C,C6,06,FE,B9,DA l 81E 
1020 DATA 91,7A,FE ( C3,D2,91,7A,DD,36,00,00,AF,DD,77,0C,7CB 
1030 DATA DD,7E,0E,FE,00,C4,3F,7C,DD,E1,C1,11,11,Û0,DD,764 
1040 DATA 19,10, BB,DD,21,2A,B7,06,08,C3,DC,7C.DD, 21, 2A.5E4 
1050 DATA 87 1 05,04,CS,DD,E5,DD,7E,OD 1 3C,FE,02,DA,C2,7A,702 
1060 DATA AF,DD,77,0D,21,C4,OO,CD,08,86,Ol,97,5A,09,DD,628 
1070 DATA 7S,07,DD,74,Q8,DD,7E,0E.FE,OO,C4,3F,7C,DD,El,779 
1060 DATA Cl,ll,ll,OO,DD,19,10.CE,DD,21,2A,87,06,04,C5,535 
1090 DATA DD,E5,DD.7E,OO,FE,O0,CA,27,7B,DD,7E,0E,FE,00,7EE 
1100 DATA C2,27,7B,DD,7E,0C,C6,06,FE,89,DA,14,7B,FE,C3,B7B 
1U0 DATA D2, 14, 7B,DD,36, 00,00, AF,DD, 77, 0C,DD,7E,0F, 30,629 
1120 DATA FE, 19 , DA, 21 , 7B , AF, DD, 77 , OF , CD, 3A, 7B , DD , El , Cl , BAO 
1130 DATA ll,ll,00,DD,19,10 ( BC,DD,2t,2A,a7,06,04,C3,DC,53C 
1140 DATA 7C,DD.7E,OF,FE,OF,DA,4B,7B,DD,34 t 0B,C9,DD,35,7B5 
1150 DATA 0B,C9,DD.21,2A,87,06,Û6,C5,DD,E5,DD,7E.0D,3C,6BA 
1160 DATA FE,03,DA,5D,7B l AF,DD,77,OD,21,50,00,CD,Oa,B6,68F 
1170 DATA Q1,53,5C,09,DD,75.07,DD.74.08,DD,7E,OE,FE,00.5D2 
1160 DATA C4,3F,7C,DD,El,Cl,ll,ll,00,DD,19,10,CE,DD,21,aF2 
1190 DATA 2A, 87,06, 06, C5,DD,E5,DD,7E,00,FE,0Q,CA,B1.7B, 793 
1200 DATA DD,7E,0E,FE,ÛQ,C2,Bl,7B,DD,7E,OC,C6,OS,DD,77,7DC 
1210 DATA 0C,FE,B9,DA,B1,7B,FE,C3,D2,B1,7B,DD, 36,00,00.898 
1220 DATA DD,El f Cl,ll,ll,OO f DD,i9.10,CO,DD,21,2A.87,06,629 
1230 DATA 06,C3.DC,7C,DD,21,2A.87,06,04,C5,DD,E5,DD,7E,7BC 
1240 DATA OD,3C,FE,02,DA,D7,78,AF,DD,77,0D,21,BD,OO,CD,730 
1250 DATA 08,B6,ED,4B,BD,B7,09,DD,75,07,DD,74,OB,DD,7E,720 
1260 DATA 0E,FE,O0.a,3F,7C,DD,El,Cl,ll,U,0O,DD, 19, 10,632 
1270 DATA CD,DD,21,2A,87,O6,04,C5,DD,E5,DD,7E,00,FE,0O,766 
1260 DATA CA,2C,7C,DD,7E,0E,FE,0O,C2,2C,7C,DD,7E,OC,Cfi,770 
1290 DATA 06,DD,77.0C,FE,B9.DA,2C,7C,FE,C3,D2,2C,7C,DD,8B7 
1300 DATA 36. 00,00, DO. El. Cl, 11, 11, 00. DD, 19, 10. CD, DD, 21, 5AB 
1310 DATA 2A,87,OG,04.C3,DC.7C,DD,7E,OE.3C,DD,77,0E,FE,6DB 
1320 DATA O3,DA.6B,7C,FE,04,DA,72,7C,FE,0S.DA,B4,7C,FE,866 



1330 DATA 06,DA,72,7C,FE,07,DA,68,7C,DD.36,ÛE,00,DD,36,6C5 
1340 DATA 00, 00, 09,21,10,27,00,75, 07, DD,74, 08, C9, 21, 71, 52E 
1350 DATA 59,DD,75,07,DD,74,08,DD,36,09.07,DD,36,OA,15,580 
1360 DATA C9,21,04.5A,DD,75,07,DD.74,Q6,C9,3A,39,S6,3C,5F8 
1370 DATA 32.39,B6,FE.03,DA,B7.7C,FE,O5,DA,C0,7C,FE,07,81D 
13B0 DATA DA.D3.7C.FE,09.DA,CO,7C,FE,19 ( DA,B7,7C,CD,99,9D0 
1390 DATA 77, CD, 36. 82, 03,72.77, 21, 10,27,22,32, 86, C3,72 t 60F 
1400 DATA 77,21,71,59,22.32.86,3E,07,32,34,a6.3E,i5,32,3F2 
1410 DATA 35,86,C3,72,77,21,04,5A,22,32,86,C3,72,77,C5,631 
1420 DATA DD,ES 1 C5,DD 1 E5,ie,00,DD,7E,00,FE 1 GC,CÀ t 2F,7D,82E 
1430 DATA 3A,39,86,FE,Û0,C2.2F t 7D,3A,36,86,C6,0B,DÛ ( BE,6C4 
1440 DATA 0B,D4,D6,7D,3A t 36,86,DD,46, 09,05, 90, DD,BE,0B,6BF 
1450 DATA DC,D6,70,3E.8C,DD,BE,OC,D4,D6,7D,3E,BC,DD,96,904 
1460 DATA OA,DD,BE,OC.DC.D6,7D,7A,FE,04,C2.2F.7D,3E,01,709 
1470 DATA 32,39,86,DD,36,OE.01,DD,El,Cl,U,ll,QO,DD,i9,5AA 
1480 DATA 10,A6,DD,El,Cl,2A,BF,B7,7E,FE,OC,CB,FE,OD,C8 ( BCa 
1490 DATA C5,DD,E5,DD,7E,00,FE,00,CA,AF,7D,FE,FF,CA,AF,A4C 
1500 DATA 7D.FD ( 21,X,S6,06,02,16,00,FD,7E,QO,FE,00,CA,5BE 
1510 DATA AB.7D,FE,FF,CA,A8.7D,DD,7E,0E,FE,O0,C2,A8,7D,95F 
1520 DATA DD,7E,0B,0D,B6,09,3D,FD,BE,0B ( D4,D6,7Û,DD,7E,857 
1530 DATA 0B,3D,3D.FD,BE,0B,DC,D6,7D,DD.7E,0C,C6,14,FD,7BB 
1540 DATA BE,0C,D4,D6,7D,DD,7E,0C,FD,BE,ÛC,DC,D6,7D,7A,eC8 
1550 DATA FE i Û4,C2.AB,7D,CD,BA.7D 1 ll.ll,0O,FD,19.10,AJ),6E2 
1560 DATA DD,Ei,Cl,ll, 11, 00,00,19,10,60,09,00, 36, OE, 01, 61F 
1570 DATA FD,36,00,FF,CD,3F,7C,CD,CC,B4,DD,E5,FD > E5,C5,A40 
1580 DATA CD,EA,78,Cl,FD,El,DD,El,C9,14,C9,DD,2i,2A,67,9El 
1590 DATA 06,02,C5,DD.E5,DD,7E,00,FE,00,CA,00,7E.DD.7E,7BB 
1600 DATA 0C,C6,O8,FE,B4,DA,FD,7D,DD,36,QO,Q0,CD,F4,B4,83B 
1610 DATA CD,EA,7B,DD,77,0C,DD,E1,C1, 11,11, 00,00,19,10,736 
1620 DATA D4,3A, 39, 66, FE, 00, C0,DD,21,2A,87, 06,02, 16,00,558 
1630 DATA 3A,37,86,DD,96,ÏJA,DD,BE,0C,DC,D6,7D,3E,A5,DD,80A 
1640 DATA BE,0C,D4,DG,7D,3A,36,B6,FE,14,C4,D6 ( 7D,7A,FE ! 6Ba 
1650 DATA 03,C2,3F,7E,3E,01,32,39,86,U,11,00,DD,19.10,3DA 
1660 DATA DO,C9,DD T Zl,2A,a7,06,08,DD,36,00,00,ll,ll,QO,48B 
1B70 DATA DD,19,10,F5,C9,C5,3A,B4,B7 ( DE,02,10 t FC,32,B4/7DO 
16B0 DATA B7,Cl l C9,2A,B9,87,23,22,B9,87,7E,FE,0O,C0,21,75D 
1690 DATA 5F,89,7E,22.B9,87 ( C9,2A,BB,87,23 1 22,BB,87,7E ( 702 
1700 DATA FE.OO, CO, 21, 6B, 89, 7E,22,BB, 87, C9.2A, 03,87,23,715 
1710 DATA 22,C3,87,7E,FE,OO,C0,21,7A,89,7E,22,C3,87,C9,77F 
1720 DATA 2A,C5,87,23,22,C5,87 ( 7E,FE,OO,C0,21,7F,89,7E,6EA 
1730 DATA 22, C5,87,C9,2A, Cl, 67,23,22, Cl, B7,7E,FE,OO,C0, 772 
1740 DATA 21,6E,B9,7E,22,C1,87,C9,2A,C7,87,23.22,C7,87,6D4 
1750 DATA 7E,FE,00,CO,21,B8.89,7E,22,C7,87 1 C9,CD,47,7E,7B7 
1760 DATA 2A,BF,87,23,7E,FE,00,C2,EB,7E,3E,01,32 1 B5,B7,6E7 
1770 DATA C9,22,BF,87,FE,01,CA,5B,B4.FE,Û2,CA,99,83,FE,8BD 
1780 DATA 03,CA,D0,B3,FE,04,CA,G2,83,FE,05 t CA,22,B4,FE,B42 
1790 DATA O6,CA,C2,B2,FE,07,CA,B8,82,FE,08,CA,77,82,FE,BE4 
1800 DATA 09,CA,Bl,82,FE.0A,CA,18 ( B4,FE,QB,CA t 2A,83,FE,7C2 
1810 DATA OC,CA,DB,82,FE,OD,CA,CC,B2,3E,01.32,B6,B7,AF,7B3 
1920 DATA 32,2B,86.32.3C,B6,32,4D,8E,CD,47,7E,CD,BE,84,67D 
1B30 DATA 21,B4,OO,ED,5B,B7,B7,01,33.0O,3E,A3,CD.2F,81,59D 
1840 DATA 21, 4F, 89, 11, 88, FB, CD, 94, 61,21, 45, 89, 11, CE, D4, 711 
1B50 DATA CD,94,81.CD,BO,84,06,96,C5,06,06,CD,A5,B4,CD,813 
1B60 DATA 47,78,CD,E7,84,CD,EA,7a,CD l E2,7F,Cl,10,EB,06,916 
1370 DATA FA,CD,AS,84,06,64,CD,A5,84,C3,CB,75,3A,CD,B7,BE1 
1880 DATA 3D,B7,32,CD,B7,CC,Da,7E,3A,B5,87,FE,01,C8 l 2A,B03 
1890 DATA BF,87,7E,FE,01,CA,C4,7B,FE,02,CA,62,79,FE,03,872 
1900 DATA CA,D6,7D,FE ) 04,CA,62,79,FE l 05,CA,5B,7A,FE,06 T aeC 



'*$&&*&£ .:/."'. 






BBBB 



>■??*? 



■ 1S20 DATA CA.AF.7, 

1930 DATA CA,07,7 

1940 DATA 81,05, Dl 

1950 DATA D2.33.8 

1960 DATA DD,4E,0 

1970 DATA Û3.3A.B 

1980 DATA DD,4Ë,0: 

1990 DATA Cl, 13,1 

2000 DATA 7E,00,F 

2010 DATA 66,04,6 

2020 DATA FF,C2,6 

2030 DATA 81,4F,C 

2040 DATA CD,IB,B 
2050 DATA FE.A2.D 

2060 DATA 6D,5E,Û 
2070 DATA 06,81, C 
20BO DATA CD,1B,8 
2090 DATA FE,A2,D 

2100 DATA 00,00, D 
2110 DATA 80,21,1 

2120 DATA DD,7E,0 
2130 DATA F5,DD,7 

2140 DATA 3E.A2.D 

2150 DATA FE,01,2. 

2160 DATA BO.El.l 

2170 DATA 09.3D.& 

2180 DATA 00,08,1! 

2190 DATA 09,30, C 

2200 DATA 20,90, El 

2210 DATA 01,02,01 

2220 DATA FE.2A.C: 

2230 DATA 06.2D.9< 

2240 DATA 09,01,0: 

2250 DATA 7E.FE.2 

2260 DATA Dl,21,0< 

227Û DATA ED.BO.D 

22B0 DATA Cl, 09,31 

2290 DATA BC,F1,3- 

2300 DATA 46,4E.CI 

2310 DATA CD.3D.B 

2320 DATA 2F.82.D 

2330 DATA C9,3E,F 

2340 DATA 0A.32.3 

2350 DATA 86,32,3 

2360 DATA 5E, BË.CN 

2370 DATA OC, 11,1 

2380 DATA 22,BD,8 

2390 DATA 36,0D,O 

2400 DATA 7E,DD,7 

2410 DATA iC, 11,1 

2420 DATA 62,63,2 

2430 DATA 22,BD,8 

2440 DATA 87,C3,E 

2450 DATA 87.DD.3 

2460 DATA 7E,FE,2 

2470 DATA DD,36,0 

2480 DATA 10,83,D 



,FE,OA,CA, 
.FE.ÛD.CA, 
,DD,7E,00. 
, CD, El, 85, 
.06,00,09, 
,87,FE,00, 
,06,00,DD, 
,AF, 11,14, 
,00,28,2c, 
.6E.03.DD, 
,80,11,10, 
,94.85,01, 
,C5.D5,DD, 
,B1.80,6D. 
,6D,7E,09, 
,C6, 85,61. 
,C5,65,DD, 
,00,81, DD 
,66,06, DD. 
,27,DD,56 
,CD,06,81, 
,0C,DD,86. 
,96,0C,C9, 
,05.DD,19, 
,00,08,19; 
,C3,2F,81. 
,D2,5B,81, 
,C3. 48,81. 
,D5,D5,21, 
,3E,07,D1, 
,66,81.23, 
.E5.D5.D5. 
,00,3E,07, 
.C2, 94.81. 
,08,19,30, 
.21,00,08, 
,C8,C3,C2. 
,FE,10,C8. 
,32,ac,Fl, 
,C3,Û6.BB 
,E1,7A,BC, 
,C9,3E,14 
.86,3E,16. 
, 86,32, 4D 
, OC, CD, 66, 
,00, DO. 19 
,C9,DD,21. 
,0D,36,QE 
.0C,DD,36, 
,00.DD,19 
.E3, 54,22, 
,C9,DD,21 
.82, DD.21, 
, 00,01, DD 
,64,66,7E, 
,06,DD,36 
.36,09,04. 



5B,7A,FE,0B, 
FE, 79,11, 14, 
FE, 00,28, 40, 
D6.7E.0C.21, 
01,65,00.09. 
CA,33,80,DD, 
7E,0A,CD,06. 
86,06, 17. CD, 
DD,7E,0C,FE, 
56.08, DD.5E, 
27, DD, 46, 09, 
Cl, 13. 10, C3. 
7E,00,FE,00, 
66,04.DD,6E, 
C6, 02, 4F, 06. 
Cl, 13, 10, C9. 
7E,00,FE,OC, 
7E,00,FE,FF 
6E,Q5,3A,B6, 
04,DD,5E,03, 
CD,5B,85,D1, 
,0A,FE,A2,D2. 
,DD,21,2B,86, 
3D.16,F7,61. 
30,04,11.50, 
C5,E5,05,ED, 
11,50,00.19, 
7E,FE,20,C2, 
OE, 00, CD, 08, 
CD,C2,81,D1. 
C9,7E,FE,20. 
21. OE, 00, CD. 
D1.CD.2F.81, 
23,C9,C5,E5, 
04, il, 50, CO, 
19,30.04,11, 
81.AF.F5.06, 
C3,EF,81,21. 
E1,3C,FE,10, 
E5.D5,ED,52, 
D2, 33.82, 3E, 
,32, 36, 86, 3E, 
32735,86. AF, 
.86. 3E, 01,32. 
7E,DD,77,0B, 
,10,ED,C9,CD, 
2A. 87, 06,04, 
,0O.CD,79,7E, 
0B,14,D6,36, 
,10,D5.3E.3C, 
BD,87,C9,CD, 
,2A.87,06,06, 
,2A.87,06,04, 
,36,OD,00,DD, 
DD,77,0B,CD, 
,0A,1D.2A,BF, 
DD,36,0A,15, 



CA.4A.7B, 
86,06,17. 
DD,7E,0C. 
33. 00, CD 
DD, 74,04. 
56,06, DD 
81,CD,6E. 
1B.81.C5 
A2.D2.75 
07,DD,7E 
DD,7E,0A. 
11.14,86 
28,26, DD 
03, 2B. 
00,DD,7E 
11,14 
23,39,DD, 
X2,DB,80 
87,FE,01, 
DD,4E,09, 
Cl, 13. 10, 
.14,81, FI 
D5,1A,11 
C9.C5.E5, 
C0,19,EB, 
B0.E1.06, 
10.F3.EB, 
6E.81.3E, 
86,01,20, 
El, 13, 13, 
C2.9C.8i, 
08.86,01, 
Di,El,13, 
C5.E5.D5, 
19,EB,E1, 
50.C0.19, 
OO.OE.OO, 
A2,89,AF, 
C8,23,C3, 
7C.BS,FE, 
Û1.C9.E1, 
80,32,37, 
32.83.87, 
2B.B6.C9. 
CD,B2,7E, 
58,84,21, 
DD.36,00, 
DD, 77,0F, 
09.07.0D. 
32. CD. 87. 
99,83,21. 
21,F1,5D, 
21,43,5D, 
36,0E,00, 
9F,7E,DD, 
87,7E,FE, 
11,11,00, 



FE,0C,B3C 
C6,1B,647 
FE.A2.7E3 
08.86.6CE 
DD.75.45B 
5E.Û5,66E 
85,D1.684 
D5,DD,63B 
80,DD,77B 
0Û.FE,68E 
CD, 06,655 
06,17,5F6 
7E,0C,711 
,56,02,798 
0A,C0,5EF 
,06,i7,5E5 
7E,0C,724 
DD,36,97B 
CA.EC.6C5 
06,00, 4B7 
B6,C9,79A 
,C9,F1,97B 
,U,00,5EB 
D5,ED,874 
EKC1.5BE 
02.11,797 
El, Cl, 699 
2D, 06,658 
4E.09,54E 
23.7E.5A2 
3E.2D.7A3 
20.4E.54B 
13,23, 49A 
ED.B0.A2F 
C1,D5,5E3 
EB,E1,5EA 
CD.32.68C 
E5,F5,9C7 
03,82,79E 
00,CA,93D 
E1,AF,899 
66.3E,e06 
32.39.4BD 
DD,21,568 
DD,77.757 
5D.56.56A 
01,DD,5D9 
CD.8C5E4 
36,OA,550 
,C9,CD,5AF 
E3.S4.7AD 
22,BD,638 
22,BD,60C 
C6,66,5DF 
77,00, 80B 
,0C,CA,61E 
DD,19,4ÛA 



2500 DATA 
2510 DATA 
2520 DATA 
2530 DATA 
2540 DATA 
2550 DATA 
2560 DATA 
2570 DATA 
2580 6ATA 
2590 DATA 
2800 DATA 
2610 DATA 
2620 DATA 
2630 DATA 
2840 DATA 
2650 DATA 
2660 DATA 
2670 DATA 
2680 DATA 
2690 DATA 
2700 DATA 
2710 DATA 
2720 DATA 



32, CD. 
36, OD, 
0B,1E. 
10, DB, 
21, 2A. 
OE, 00, 
07, DD, 
CD, 87, 
00,01. 
36, OA, 
87, DD, 
09,14, 
SE, 37. 
09, DD, 
DD.36. 
OC.DD, 
D9.3E 
2A.B7, 
00, CD. 
09,07, 



01,DD,36,OD. 
66,7E,DD,77 
DD.36, OA, 14. 
B7,C9,DD,21. 
00, DD.36, OE, 
DD.36. 09, 07 
3Ë, 32, 32, CD, 
87,06,04, DD : 
CD,BC,7E,DD, 
36,0A,1B.11 
2i,5D,56,22, 
DD.36.0B.OO 
13,21,07.57, 
36, 00.01, DD 
6D, 36. 01,13, 
32, CD, 87, C9 
21, 2A, 87, 06, 
OE. 00, CD, 66 
36,09,02,60. 
32, 32, CD, B7 
06, 04, DD, 36, 
C5.7E.66.77 
DD,36,0A,1B, 



00.DD.36, 
0B.CD.9F, 

11,11,00, 
2A, 87,06, 
00,CD,8C, 
6D,36.0A, 
87,21,5D, 
36,00,01, 
77,0C,DD, 
ll.OO.DD, 
B6,Û7,C9, 
DD,36,0C, 
DD,75,07, 
36,0B,1E, 
21,67,57, 
CD, 22, 84, 
08,DD,36, 
7E.DD.77, 
36,0A,OF, 
21.53.59, 
00,01, DD, 
0B,CD.8C, 
11,11,00, 



OE,00,CD, 
7E,DD,77. 
DD,19,10, 
04.DD.36. 
7E,DD,77, 
1B,11,11, 
56,22,BD, 
6D,36,0D. 
36.0B.OA, 
19.10.6B. 
66.2i.2A, 
00,DD,36 
DD,74,08. 
DD.36.0C 
66,75,07, 
21, IF, 50. 
00,01, DD, 
08, CD, 9F 
11,11,00, 
22.BD.87 
36,00,00, 



7E.t 



06.06, DD.62A 
66,7E,FE,527 
OC.DD, 36, 79F 
D4,3E,41,3B9 
00,01,06,5F9 
QC,DD,36,5AE 
00. DD. 19,390 
87,C9,DD,6C1 
00, DD.36, 423 
6D, 36,09,589 
3E.32.32.3E4 
87, DD, 36, 719 
09,i4.DD,44B 
6D,21,3B,58D 
00. DD, 36, 509 
DD. 74,08, 54E 
22. BD. 87, 639 
36,OD,00,4BA 
7E,DD,77,76F 
DD,19,i0,37E 
C9,DD,21,6C9 
DD,36,OE.410 
0C.DD.36.7B9 
D9.3E.32.3B9 



FAIRBANK ? 

Pas une autre gestion de compte bancaire ? 
Si, si,... mais quel programme ! 

Enfin, une "gestion de compte bancaire" d'une efficacité impressionnante, 
d'une simplicité éclatante, Un véritable livre de caisse de 40 colonnes sur 
disque, Quarante postes, ou comptes, numérotés, dénommés par vous et 
indexés, auxquels toutes transactions sont attribuées. Lister ou imprimer, 
par poste, par nom, par catégorie, de date à date, etc. Analyser à tout 
moment l'ensemble de vos dépenses et recettes. Afficher les soldes des 
postes à plein écran, Idéal pour incorporer dans une comptabilité 
traditionnelle. 

Une importante caractéristique de FAIRBANK est d'avoir toujours sur l'écran 
la dictée nécessaire pour effectuer chaque étape de l'opération en cours 
sans aide extérieure. 

Enregistrer un chèque 1 Plus simple que de l'écrire dans un chéquier, semi- 
automatique en fait. Toutes écritures sont triées, classées. Un relevé de 
compte ? Jeu d'enfant ! Saisir deux dates, le listing s'affiche et, à ia deman- 
de, une concordance avec le relevé bancaire paraît, toute différence chiffrée. 
POUR CPC 6128 SEULEMENT A Bf\ 

UTILISE LE DEUXIEME 64 K AwU F 

PORT PAYE - ENVOI LE JOUR MEME 



2730 DATA 
2740 DATA 
2750 DATA 
2760 DATA 
2770 DATA 
2780 DATA 
2790 DATA 
2B00 DATA 
28 10 DATA 
2820 DATA 
2830 DATA 
2840 DATA 
2850 DATA 
2860 DATA 
2870 DATA 
2880 DATA 
2690 DATA 
2900 DATA 
2910 DATA 
2920 DATA 
2930 DATA 



32, CD, 87, 
0B,88,32, 
2B,7C,B5, 
33,00, 3E, 
01,38, U, 
FE,08,CA, 
€3,09,85, 
85,3A,0C, 
88,11, 6B, 
3A r ÛD,88, 
0C,88,C6 : 
ll.Efi.OO, 
0D.86,C6. 
11,45,01, 
FS,D5,ED. 
C8,18,ED, 
3D,C8,18 
04,01,50, 
00,20,10 
28,08, 1A, 
Bl,77,13. 



21, E3, 54.22, 
OC, 88, 32,00, 
20,FB,1Q,F6. 
A3,C3,7E,B5, 
ED,B0,C9,2A. 
F4,84,FE,05, 
3A, 00,88.30, 
88, 30,32. OC, 
00.C3, 53.85. 
C6,05,32,0D, 
02, 32, OC, 88. 
C3,53,85,3A. 
02,32,00,88. 
C3,53,85,2A. 
BÛ,D1,E5,21. 
C5,F5,E5,ED, 
,F0,C5,F5,E5 
CO,09,Fl,Cî. 
,1A,FE, 00,28 
18,0B,7E,E6, 
,23,10,QA,Ei 



J,8T,C9,A 
1,32,0E,8 
i, 11.64,0 
[,64,00,3 
: ,B7,7E,F 
^,35.85,F 
l, OC, 88.1 
J,3A,0E,8 



,32,682 ^\lY" ^^"~ 

■ 0MC7 hj »v\ , . ixl -JS 

,01,624 S/W^- 

,00,40B 



84,818 
84,905 
53,4AC 
ÛE.432 
88,4FB 
3A,541 

3A,0D,88,C6,03,32.0D,88,481 
3A.529 
88,487 
C5.685 
3D,945 



1, 11, FA, 00, 03, 53, £ 



OC, 88. 06,03, 32,0 
3A.0E, 88.06.05,3 
09, B7, 19,22,09,8 
33,00. 19, EB, El, f 
BO, El, 01, 33,00,0 
ED,B0,E1.01.00,C 
3D,C8,16,EA,C5,E 
18.E6, 55,28. 08,1 
55,18,03,7E,E6,A 
01,33, 00,09,01, E 



3, 30.76C 
I,FE,7FD 
Î.AA.4AA 




2940 DATA 
2950 DATA 
2960 DATA 
2970 DATA 
2980 DATA 
2990 DATA 
3000 DATA 
3010 DATA 
3020 DATA 
3030 DATA 
3040 DATA 
3050 DATA 
3060 DATA 
307O DATA 
3060 DATA 



CE,C5,E5 
C0.t9.EB, 

87.06,00, 
11,00,08, 
DD, 74,02, 
3D,C3,0C, 
04,05,06, 
00,00,00, 
00,00,00, 
00.00,00, 
00,00,00, 
00,00,00, 
02,00,00, 
54,01,02, 
93,06,54, 



D5.ED,BI 
El, 01, 3: 
DD,4E,01 
19,D2,FI 
DD,75,0 
86,01,0 
07,08,0! 
00, OC, 5 
00,00,0= 
00,00,0 
01,00,0' 
00,00,0 
OO^.O- 
00,00,0 
01,03,0 



,01,21,00. 

,00, 09, Cl, 3D, 

,09,DD,7E,0C, 

,85, 11, 50, CO, 

,C9,EB,21,00, 

,03,10,11,12, 

,OA,0B,0C,OD, 

,0A, 16,00, 00, 

,C0,54,Û2,0B, 

,00, 00, CD, 54. 

,00,00,08.93, 

,00,00,00,00. 

,00,01,00,00, 

,00.00,00,02. 

,00,00,00,00, 



19.30,04,11,50,692 
08,18, ES, 2A.B7, 686 
FE.OO.CA, 01,86,582 
19,3D,C2,F2,85,636 
00,FE,00,C8,19,65A 
13,14,15,16,17,234 
OE.OF, 01, 00,00,073 
00,00, 00, 00, 00, 07F 
00,00, 00,00, 00, 12E 
02,0B, 00,00. 00, 12E 
C4, 54, 01,02,00,187 
OD, 93, C4, 54,01, 1BA 
Û0,00,12,93,C4,16C 
00,00,00,00,17,070 
00,02,00,00,00,183 
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3550 DATA 41,54,49,4F,4E,53,2A,02,0C,22, 19,2B,07, IE.26,287 
3560 DATA 2F, 14, 1B, 00,01, 0F.00, 01, 32,55, 73, 4B.7D, 96,0F, 2DG 
3570 DATA 20.58, eC,00,OA,F3, 0A,C3, 00.0A.E1, F5.C3, FF. EB.82B 
3580 DATA CÛ.D7, 00. OA, 14, 1E, 28,0F, 19,23, 00, AB, 4A T 4C, 12,346 
35B0 DATA 42,01,08.2F. 12, 42.04, E6.F4,D8,3fl,E8, 28, El, 00, 5AF 
3600 DATA 00,06,02,01, 18, 17,08,04.09,0F. 10,12, 1A,0E, 03, 0A9 
3610 DATA 3E,01,21,F3.8A,CD,BC,BC,3E,02,21,FD,8A,CD,BC,793 
3620 DATA BC,3E,03,21.01,8B,CD,BC,BC,3E,04,21,OB,BB,CD,5B2 
3630 DATA BC.BC.3E,01,3Z,EE,8A,2A,0F,8B,22.F1.8A.21.1i,5F4 
3640 DATA 8B,22,EF,8A,21,DF,8A.01,00,B1,11,EF,89,C3,D7,755 
3650 DATA BC,F3,F5,D5,E5,C5,DD,E5,FD,E5,CD,06,8A,FD,E1,C02 
3660 DATA DD,E1,C1,E1,D1,F1,FB,ED,4D,3A,EE,8A,3D,FE,00,A44 
3670 DATA CA. 13.8A,32,EE,8A.C9,2A,F1,8A,2B,7C,B5,CA,4E,7F3 
3680 DATA 6A, 22, FI, BA, 06, 03, DD,2A,EF,BA,C5,DD,E5, 11,01,749 
3690 DATA 00, DD,7E,00,FE.OO,CA,39.8A. CD. 60, 8A, 11,05,00,583 
3700 DATA DD,E1,C1,DD, 13. 10, E5, DD, 7E.0O, 3C, 32, EE T 8A, DD, B6fl 
3710 DATA 23,DD,22.EF,BA,C9,21,11.8B,22,EF,8A,2A,0F,BB,eeû 
3720 DATA 22, F t . 6A, 3E, 32 , 32. EE, 8A , C9 , DD, 7£. 00 , B7 . 00 . DD, 637 
3730 DATA 7E.Q4.FD.21, A0.8A,3D,FE, 00, CA.7A.8A, 11,09,00, 5ED 
3740 DATA FD, 19.C3, 6C. 8A, DD, 7E, OO.Fù, 77. 00, DD,7E, 01 , FD, 7F7 
3750 DATA 77, 03.DD. 7E. 02, FD, 77. 04, DD, 7E, 03,FD, 77, 07.FD. 725 
3760 DATA 36,08,00,FD,36,06,OF,FD,EG,E1,C3,AA,BC,00,01,673 
3770 DATA 00, 00, 00. 00,0F, 00, 00. 00, 02, 00, 00,00, 05,0F, 00, 025 
3780 DATA 00, 00, 03, 00. 00, 00. OO.OF. 00. 00, 00, 04, 00, 00, 00, 016 
3790 DATA 00, OF, 00. 00, 00, 02, 00, 00, 00, 00, OF.OO, 00, 00, 02, 022 
3800 DATA 00, 00, 00, OF.OF, 00, 00,00, 02, 00, 00, 00, 19,0F, 00, 048 
3610 DATA 00,00,00,00,00,00,00,00,00,00.00,00,00,00,00,000 
3820 DATA 00,00, 00, 00,00, 00, 03, 01, 00, OA.OA, FF, 01, 01, 00, 119 
3830 DATA 0A.01, OF, FF, 03,02, OA,FF,08,05, FF.04,02. 10.02.34fl 
3840 DATA 01, OF, FF, 01, C3, 00, 01, 3F, 01, 28,01, 00, 00, OB, 00, 246 
3850 DATA 02, 1C, 01, 50,0t. 00, 27,01, EF, 00. 28,01. 00,00, OB, 1BB 
3860 DATA 00, 02, 05.00,50, 01, 00, 27, 01, 3F, 01, 28, 01, 00,00,189 
3870 DATA OB, 00.02. 1C, 01. 50.01 . 00.27, 01, BE f 00,28. 01 ,00, 18A 
3880 DATA 00, OB, 00, 02,D5;Q0, 50, 01, 00, 27, 01, 3F, 01,28,01.104 
3890 DATA 00,00,08.00.02, 1C, 01, 50, 01, 00. 27,01, EF, 00, ZB.1BA 
3900 DATA 01,00,00,OB,00,02.D5,00,50,01.00,27,01,EF,00,24B 
3910 DATA 28, 01, 00, 00, OB, 00, 02. FD, 00, 50, 01, 00, 27.01, 3F, 1EB 
3920 DATA 01,28,01.00,00,06,00,02, 16,01,50. 01, 00, 27.01, OCD 
3930 DATA 50, 00, 28, 01. 00, 00, OB. 00, 02, 47. 00, 50,01, 00, 27, 145 
3940 DATA 01, 3B, 00, 28, 01, 00, 00, 06,00, 02, 35, 00, 50, 01, 00, OFB 
3950 DATA 27,01,50,00,28,01,00,00,08,00.02,47,00,50,01,146 
3960 DATA 00. 27, 01, 2F, 00, 26, 01, 00, 00, 08,00,02,35, 00. 50, 112 
3970 DATA 01. 00, 27,01. 50, 00, 28,01, 00, 00, 08,00, 02, 47, OO.0F6 
3980 DATA 50,01, 00, 27, 01, 3B,00,2B,01,00, 00, 08, 00,02, 35, 11F 
3990 DATA 00, 50, 01. 00, 27, 01, 3B, 00, 28,01. 00.00. 08, 00, 02, OEA 
4000 DATA 3F. 00, 50, 01. 00, 27, 01, 50, 00.28, 01, 00, 00, 06. 00,130 
4010 DATA 02.47,00, 14. 01,00, OB. 00.02. 47.00. 14, 01. 00.08, 0D2 
4020 DATA Ol,00,0O,OO,02,02,47,00,14,01,0O,0B.O0,02,47,0B5 
4030 DATA 00,14, 01, 00. OB, 01, 00.00. 00, 06, 02,47, 00, 14.01,085 
4040 DATA 00,06,00,02,47,00, 14,01,00,08,01,00,00,00,02,077 
4050 DATA 02,47,00, 14, 01,00, OB, 00. 02. 47, 00, 14, 01,00, 0B,0D2 
4060 DATA 01,00,00,00,06,02,59,00, 14, 01,00, CE, 00, G2,5S,GDD 
4070 DATA 00,14,01,00,08,01,00.00,00,02.02,59,00,14,01,093 
4080 DATA 00.08,00.02,59,00, 14, 01, 00, 08,01,00, 00, 00,06, 06D 
4090 DATA 02,59,00, 14,01, 00, OB. 00, 02, 59, 00,14, 01.00, 0B,0F6 
4100 DATA 01,00,00,00,02,02,59,00, 14, Ol.OO.OB, 00,02,50,000 
4110 DATA 00. 14,01,00,08.01,00,00,00,06,02,47,00, 14,01, 0B5 
4120 DATA 00,08,00,02,47,00.14,01,00,08,01,00,00,00.02,077 



4130 DATA 
4140 DATA 
4150 DATA 
4160 DATA 
4170 DATA 
4180 DATA 
4190 DATA 
4200 DATA 
4210 DATA 
4220 DATA 
4230 DATA 
4240 DATA 
4250 DATA 
4260 DATA 
4270 DATA 
4280 DATA 
4290 DATA 
4300 DATA 
4310 DATA 
4320 DATA 
4330 DATA 
4340 DATA 
4350 DATA 
4360 DATA 
4370 DATA 
4380 DATA 
4390 DATA 
4400 DATA 
4410 DATA 
4420 DATA 
4430 DATA 
4440 DATA 
4450 DATA 
4460 DATA 
4470 DATA 
4480 DATA 
4490 DATA 
4500 DATA 
4510 DATA 
4520 DATA 
4530 DATA 
4540 DATA 
4550 DATA 
4580 DATA 
4570 DATA 
4580 DATA 
4590 DATA 
4600 DATA 
4610 DATA 
4620 DATA 
4630 DATA 
4640 DATA 
4650 DATA 
4660 DATA 
4670 DATA 
4680 DATA 
4690 DATA 
4700 DATA 



01,00, 
00, i4. 
00, OB 
02, 3B. 
01,00. 
00,14. 
00, OB. 
02, 3B. 
01,00. 
00,14. 
00, OB: 
02,35 
01,00. 
00,14. 
00, OB. 
02, 3B. 
01,00. 



00,14 
00,06 
02,47. 
14,01 : 
8E.00. 
00,00. 
02,47 
14.01 
00,06 
59,00. 
01,04 
01,00, 
OB.OO, 
59,00, 
00,00, 
00,02 
00,14. 
00, OB, 
50,03. 
02,02, 
0B.01 
03,08. 
02,36 
14,01 
BE.OO 
00,00. 
01,00 
00,14, 
00,02. 
35,00. 
01,04 
01,00, 
00,14 
04, B3, 
00,00 
00.02 
00,14 
00, OB. 
02,3F 
14,01 



1,00,06,02, 
L, 00, 08,01 
1,02,47,00. 
).U.01.00 



1,00,02,02. 
l, 00, OB,01. 
), 02, 38,00, 
(,14,01,00 



;. 00.08,01. 
1,02,35,00, 
(.14,01,00. 
1,00.02,02, 
„0Û,ÛB,01. 
1,02, 3B, 00, 
(,14,01.00. 



). 02, 3F, 00. 
(.14,01,04 
l,0B,01,0O. 
1,03,08,00 
i, 02, 47,00, 
(,14.01,00 
1,08,00,02. 



ï, 59, 00, 14 
1,01,00,08 
i. 00. 14,03 
1,00,06,02 



>.. 59. 00,14, 
..Ol.OO.OB. 

(.06.02,47. 
',00,14,01, 
l, 04, 9F, 00 
.,00,00,00. 
1,00,02.47 
',00,14,01, 
1,00,00,06 
1,02,38,00, 
(,14,01,04 
(,08,01,00 



), 03,06,00 
1,02,36,00. 
1.01. 00,00 
1,08,00,02 
ï, 35, 00, 14 
1,01,00,08. 
i.00,50,03 
1,00,02,02. 
1,00,08,01 
1.14,03,06, 
),02.02,3B 
1,00,14,01. 
1,04,63,00 
,,00,00,00, 
(,14,01,00 
l.OB, 00,02. 



47,00, 
00,00. 
14,01, 
OB.OO. 
3B.O0, 
00,00, 
14,01, 
08,00, 
35,00, 
00,00, 
14,01. 
OB.OO, 
35,00, 
00,00, 
14,01, 
OB.OO, 
3B.0O, 
00,00, 
14,01. 
8E.0O. 
00,00, 
02.47. 
14,01 
06,01 
47,00, 
01,04, 
01,00, 
OB.OO. 
59,00. 
01. 00 
00.02, 
00,14. 
00. OB, 
,'14,03, 
06,02, 
,00,14, 
00, OB, 
,02,3B, 
14,01. 
.BE.OO. 
.00,00, 
,02.3B. 
.14,01 
,00.06 
.35,00, 
,01,04 
01,00. 
, 08,00. 
35,00. 
,00,00. 
00,02, 
,00,14, 
00, OB, 
,50,03. 
02,02, 
,06,01 
.47,00, 



02.47,00 
01,00.00. 
00.14.01 



02,38,00 
01,00,00. 
00,14,01 



00,08,00, 
02,35,00 
01,00.00, 
00,14,01. 
00, OB.OO, 
02,3B,0Û. 
01,00,00, 
00,14,01. 



00,08,00. 



02,38,00 
01,00,00, 
08,00,02 
47,00,14. 
01.00, OB 
00,50,03, 
00,82,02 
00,OB,01, 



14,03,08 
02,02,59 
00,14,01 
04,63,00 



00,00,00. 
14,01,00. 
9F. 00. 14. 
00,00,02, 
02,47,00. 
14,01,04, 
06.01,00 
47,00,14, 
01,04, BE 
01,00,00. 
06,00,02 
36,00,14 



01,00, OB 
00,02,3B 
00,14.01 
00,06,01 
14,03,06 
06,02,35. 
00,14,01 
00,06,00. 
02.36,00 
14,01,00. 
63,00,14 
00,00,06. 
02,38,00 
14,01,00, 
00,06,02 



00, ( 



02,47,089 
14,01,081 
00,06,078 
OO,0B,06A 
02,38, 09D 
14.01,079 
00,02,066 
OO.ÛB.OBA 
02,35,095 
14,01,06F 
00,06,069 
00,06,ÛAE 
02,47,OA3 
14,01,079 
00,02, 066 
OO.0B,O6A 
02.3B.0A1 
14.01,075 
00,06,073 
47,00,158 
01,04, ÛB5 
01,00, 11A 
0B,OO,154 
47,00,085 
00,00,08A 
00,02,151 
00,14,0EB 
0O,0B,155 
50,03,181 
02.02,086 
06.01, OEC 
03,OB,129 
02,47,085 
14,01,138 
9F, M, 113 
.00,00,008 
01,00,009 
.00,14, 13A 
00,02, Û6E 
,36,00,173 
01,04,07D 
,01,00, 17A 
00,14,080 
,Û4,BE,0F1 
, 00,00, Û7A 
00,02.104 
OO,14,0A7 
00.08,148 
02,47,0A3 
14,01,079 
08,01,137 
03,08, 12D 
02,3B,0A1 
14,01,170 
06,00,068 
47,00,081 
00,00, OSA 
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4720 DATA 
4730 DATA 
4740 DATA 
4750 DATA 
4760 DATA 
4770 DATA 
4780 DATA 
4790 DATA 
4800 DATA 
4810 DATA 
4820 DATA 
4830 DATA 
4840 DATA 
4880 DATA 
4860 DATA 
4870 DATA 
4B80 DATA 
4690 DATA 
4900 DATA 
4910 DATA 
4920 DATA 
4930 DATA 
4940 DATA 
4950 DATA 



00,08,01,01 
02.47,00.1 
14,01,00,0! 
00,06.02,8 
8E, 00, 14,0 
01,04,10,0 
01,00,00,0f 
08,00,02,8 
8E, 00, 14,0 

oo, oo, oo, a 

00, 02, 83,0* 
00,14,01,0 
00,08,01,0- 
50.03.0B,0 
02.02,83,0 
08,01,00.0 
03, OB, 00,0 
02, BE, 00,1 
14,01,00,0 
3F, 01, 50,0 
00,00,02,0 
01,00,08,0 
01,14,03,0 
00,02,02,7 



,01,00. 
.00,02, 
.00,14. 
,00,08, 
,14,03. 
,08,02, 
,00,14. 



06,02,47,00,! 
0B.01, 00,00,1 
3F, 00,14, 01, ( 
01.04,10,01,1 
01, 00,00, 00,( 
08,00,02, 8E,( 
BE,00,14,Q1,( 
01, 00, OB, 01,1 
00, 02. 8E, 00,1 
00,14,01,04.f 



,14,01, 
.66,01, 
,00,00, 
,02, B3, 
,14,01, 
,00,08. 
,8E,00, 
.01,04, 
,01.00, 
.OB.OO. 
,8E,00, 
,00,00. 



00,08,01, 00, ( 
14,03, 08, 00. f 
06, 02, B3, 00,1 
00.14,01,00,1 
00,08,00,02,1 
02, QE, 00, 14,1 
14, 01,00,08,1 
3F. 01, 14,03,1 
00,00,06,02,1 
02, 8E, 00, 14,1 
14,01,00,08, ( 
.00,06,02,77,1 



,00,02. 
.00,14 



77,00,14,01,1 
01.04,78,01, 



01,00, 
02,02, 
08,01, 
03.08, 
02, BE, 
14,01, 
1C.01, 
00.00, 
01,00, 
01,14. 
00,02, 
B3.00 
01,04, 
01,00 
00,14, 
04.3F 
00,00. 
00.02 
00,14, 
00, 08 
02, BE 
14,01 
0B.01, 
03,08. 



08,00, 07B 
50,00, OBE 
00,00,062 
00,02,OFO 
00,14,155 
00.Ofl.OF4 
50,03,120 
02.02,000 
0B,Ol,15F 
03.08, 15D 
02,B3,iaD 
14.01. 16C 
66.01,147 
00.00,134 
01,00. 18D 
01,14,10F 
00,02,001 
6E.00.19B 
01,04,OD0 
01,00, 14F 
00,14,156 
.04,78,120 
OO.OO.OBD 
,00,02,134 



4960 DATA 
4970 DATA 
4960 DATA 
4990 DATA 
5000 DATA 
5010 DATA 
5020 DATA 
5030 DATA 
5040 DATA 
5050 DATA 
5060 DATA 
5070 DATA 
5080 DATA 
5090 DATA 
5100 DATA 
5110 DATA 
5120 DATA 
5130 DATA 
5140 DATA 
5150 DATA 
5160 DATA 
5170 DATA 
5180 DATA 
5190 DATA 
5200 DATA 



01,04, 
01,00, 
00,14, 
04, 1C,' 
00,00, 
00,02, 
00,14, 
00, OB, 
02, BE, 
14,0t, 
08,01, 
03,08, 
02.77, 
14,01, 
OB.OO, 
8E,00, 
00,00, 
14,01, 
08,00, 
9F, 00, 
1C,01, 
01, 1C, 
OF.01, 
01,0F, 



;, 01. 50,03, 
■,00,02,02, 
,00,08,01, 
,14,03,OB, 
J,02,02,6A. 
; , 00, 14,01, 
,04,10,01. 
,00,00,00, 
1,14,01.00. 
,78,01, U, 
1,00,00.02, 
1,02,77,00, 
1,14,01,04, 
',08,01,00, 
!. 7F, 00, 14. 
,Oi,00,OB, 
1, 02.02, BE. 
1,08,01,00, 
!,BE,00,14, 
;, 01, 00, 08, 
i,ûl,02,8E. 
.,14,01,02, 

;, 01,14,01, 

1,00,00,00, 



00,02.77,00, 
77,00,14.01,00, 
00,00,00,06,02, 
00.02.6A, 00,14, 
00,14,01,04,10, 
00, OB, 01, 00, 00, 
50,03, OB, 00.02. 
02, 02, 6A, 00, 14, 
08,01,00,00,00. 
03, OB, 00,02, 77, 
02,77,00,14.01. 
14,01,00,08,01. 
,,01,50,03.08. 
00,00,02,02,77, 
01,00,08,01.00 
00, 02, 8E, 00, 14. 
00,14,01,00,08 
00,00, 06, 02, BE. 
01,00,08,01,00 
00, 02, 7F, 00, 14, 
00,14,01,04,47 
BE, 00,14, 01, 04, 
02, SE, 00, 14,01 
00,00,00,00,00, 



14,01,00,08,178 
OB, 00, 02, 77, 115 
6A,00,14,01,OAB 
01,ÛO,OB,01,ODO 
01,14,03,OB,OC6 
00, 06,02, 6A.0FF 
8A, 00, 14,01.115 
01, 00,08, 00, 09A 
06,02,77,00,130 
00,14,01,00,145 
04,78.01,14,130 
00,00, 00,06, OAE 
00,02.77,00, 1E5 
00, 14, 01, 00, OBI 
00,00.06.02,065 
01,00,08,01, 15F 
00,02,8E.OO,142 
00,14,01,00,000 
00,00,02.02,000 
01,00,08,01,161 
00, 14. 01,0F, 146 
47,00,14,01,138 
04,47,00,14,146 
00,00.00,00,010 
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V*rf*^"VWSA«VsA^*V'A*WS*VV' 



20 ' DATAS POUR C0SH0S2.BIN 

30 ' 



40 HODE 2:AD=2OOM:HL=110 
50 FOR fl=l TO 276:T0T=0:FOfi T=0 TO U;8EAD A$ 
60 POKE AJ),VM,<V+M):T07=TOT+PEH(AD):M)=AD+1 
70 NEX7:READ SOH*:IF VALCf+SQHilOTOT TKFJ 100 
&0 LOCATE l.hPBIBT'LIGSE'îNL; "CORRECTE" 
90 NL=NL+10:NEXT:5AVE"COSH0G2.BIN*,a,&4E2O,bl025:£ND 
100 LOCATE 1 , 1 :PB I HT" L I GNE" ; HL ; " ï HCDREECTE" :EHD 
110 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
120 DATA 00. 00, 00,00. 00, 00, 00,00, A2,00, SA, 00, 08, 00, A2, IDG 
130 DATA 55, 8A.4S.AA, 04, OO.AE.OO. 50,00,06, 00, FB.AA.DF, 569 
140 DATA A2.DF,8A.5D,0e,5D,06.5D,ÛS.AE,AA l FB,>LA,E7,AA,7Ca 
150 DATA EF,AA,AE,AA,AE,AA,AE.AA,AE,AA,FB,AA,DF,A2,FF,B1E 
160 DATA 8A,AE,AA,5D,AA,5D,08,OC,06,FB,AA,DF,A2,FF,8A,BU 
170 DATA AE,AA,FF,08,5D,Oe,AE,AA,F7,00,DF,AA,DF,8A,5D,862 
180 DATA OB,OC,08,55,08,55,08,DB,A2,DF,BA,DF,AA,OC,AA,5FB 
190 DATA FF,OB,5D,08,AE,AA,FB,AA,DF,A2,DF,ÀA,OC,AA,5D,866 
200 DATA 08,5D,08,AE,AA,DB,A2,DF,8A,55,BA,55,08,04,AA,695 
210 DATA 04, AA,04,AA,FB,AA,DF.A2,DF,8A,AE.AA,5D, 08, 50,805 
220 DATA 08,AE,AA,FB,AA,DF,A2,DF,BA,AE,08,FF,QB,5D,0e,BU 
230 DATA AE,AA,00,00,3Q,30.CC,CC,3F,3F,3C,3C,F3,F3,00,62C 
240 DATA 00,00,00,30,20,CC,B8,3F,2A,3C,2B,F3,A2,00,00,406 
250 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
260 DATA 00,00,00,00,00,00.00,00,00,00,00,00,00,00,00,000 
270 DATA 00,00,00,00,00,00.00,00,00,00,00,00.00,00,00,000 
280 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
290 DATA 00,00,QO,00,00,OO,QO,0O,QO,OO,FB,AA.DF,A2.DF,405 
300 DATA 8A,0C,08,5D,0B,5D,08,5D,08,DB,AA,DF,A2,DF,8A,63C 
310 DATA OC,AA,5D,08,5D,08,OC,AA,FB.AA,DF,A2,DF,AA,5D,742 
320 DATA AA,5D,AA,5D,08,AE,AA,DB,AA,DF,A2,DF,8A,5D,08,842 
330 DATA 5D,O6,SD,08,OC,AA,DB,A2,DF.AA,DF,OO,ÛC,0O,5D,5CE 
340 DATA QO,5D,ÂA,0C,0B,DB,A2,DF,AA,DF,00,QC,ÛO,5D,0Q,569 
350 DATA 5D,OO,5D,00,FB,AA,DF,A2,DF,OO,5D,QB,5D.0B,5D.5E6 
360 DATA 08,AE,AA,F7,A2,DF,BA,DF,8A,0C,0a.5D,08,5D,08,6A9 
370 DATA 5D,08,FB,AA,EF,AA,EF,AA,AE,AA,AE,AA,AE.AA,AE,9F2 
360 DATA AA,51,A2,55,BA,55,8A,55,08,FF,08,5D,Ù8,AE,AA,67C 
390 DATA DF,A2,DF.A2,DF,8A,0C.AA,5D,08,5D,08,5D,08,F7,?47 
400 DATA O0,DF,0O,DF,0Û,5D,0O,5D,O0,5D.AA,0C,OB,F7,A2,52C 
410 DATA CF,8A,DF,8A,5D,08,5D,08,5D. 08,50, 08. DB.AA.DF.6BA 
420 DATA A2,DF,BA,5D,Oa,5D,Oa,5D,O8,5D,0B,FB,AA,DF,A2,6C5 
430 DATA DF.8A,5D,08.5D.Ô8,5D,08,AE,AA,DB,AA,DF,A2,DF,7D5 
440 DATA 8A,5D,0B,0C,AA,5D,00,5D,00,FB,AA,DF,A2,DF,8A,6EE 
450 DATA 5D,08,5D,08,OC,08,AE,AA,DB,AA,DF,A2,DF.6A,5D,702 
460 DATA 0B,OC,AA,5D,O8,5D,Oa,FB,AA,DF,A2,DF,AA,AE,AA,78F 
470 DATA FF,Oe,5D.0B.AE,AA.DB,A2,EF,AA,EF,AA,AE,AA,AE,979 
480 DATA AA,AE,AA.AE,AA,F7.A2,DF,8A.DF,BA,5D,Û8,SD,08,8BF 
490 DATA SD,OB,AÉ,AA,F7,A2,DF,6A,DF,8A,5D,OB.5D,0B,AE,7AO 
500 DATA AA,AE,AA,F7,A2,DF,8A,DF,BA,5D,0B.5D,O8,OC,0B,74B 
510 DATA 5Û,08,F7,A2,DF,8A,DF,BA,AE,AA,5D,08.5D,08,5D,?4F 
520 DATA 08,F7,A2.DF,BA,DF,BA,OC,08,AE,AA,AE.U,AE,AA.68F 
530 DATA DB,A2.DF,8A,FF.8A,AE.AA,5D,AA.5D,0B.OC.ÛB,45,78C 
540 DATA A6, 08, 00. 00. 00, 00. 00,00, 00, 00,00, 00, 00, 00, 00, OAE 



550 DATA 00,OO,O0,00,00,DB,0C,Û0,AE,4D,A2,OO,0O,Û0,0G,284 
5G0 DATA 00,00, 00,00,00, 00, 00, 00, 00, 00, 00, 00, 00,00,0c, OOC 
570 DATA DB, 00, AE.8E.8A, 00,04, E7.A2, 00,00, 00, 00,00.00, 42E 
580 DATA 00,0O,OO,OO,0C,E7 1 00,00,4D,4D,00,59,OO,AE,0O,294 
590 DATA 51, OC, 08, 00, 00. 00,00, 00, 00, 00, 00, 00, OO.DB, OC, 14C 
600 DATA 00,04,A2,55,Q8,5D,00,OC,00,45,AE,8A,00,51,QC,346 
610 DATA A2,0Û,S9,00,Û4,A2,00,4D,AE.00,04,AA,04,08,8E,3E4 
620 DATA 00, EF, 00, FF, 00, 5D, 00,04, DB, 08,00, A6, 00,51, 08, 431 
630 DATA O4,AA,51.O8.45,OS,55,8A,E7,OO,O0,O0,8E,0O,4D,3F5 
640 DATA 00,45,4D,AA,00,DF,OÙ,45,AA,Ù4,8A,55,06,5l,8A,4W 
850 DATA 00,0Q,0C,Q0,OO,0O,F7,OO,FB,0O,A6,O0,59.0O,AE,3AB 
660 DATA A2,FF,08,55,A2,04,AA,04,08,00,00,AE,00,00,00,4Q8 
670 DATA OC,00,A6,00,AE,ÛO,5D,00,OC,AA,8E,OB,51,Û8,45,3A7 
6B0 DATA A2, 55, 08,00,00, 59, 00,00, 00, DB, 00, 4D,00,5D, 00, 2DD 
690 DATA 8E.OO,EF,08,F7,8A,04,8A,04,08,00,A6,FF,00,5D,5A2 
700 DATA 00, 00,00, 4D, 00, BE.OO.DB, 00,00,00, 59, DB,QC,A2,398 
710 DATA 45,08,04,8A,00,AE,8E,00,8E,OO,00,O0,FF,0O,5D,4Ol 
720 DATA OQ,OC,0O,OO,Q0,A6,OC,DB,08,04,AA,51,08,QO,5D,3O5 
730 DATA F7,00,E7,00,00,00,8E,00.4D,00,4D,00,00,00,DF,3E5 
740 DATA 4D,4D,AA,04,8A,55,08,00,00,04,A2,OC,00,00,00,2E1 
750 DATA F7,00,FB,00,04,FF,08,00,AE,04,55,08,55,A2,04,507 
760 DATA AA,00,00,5t,08,AE,00,00,00,OC,00,A6,00,04,8E,2F5 
770 DATA 08,00,OC,04,04,08,51,08,45,A2,00,00,45,AA,59,2AC 
780 DATA 00,AE,00.DB,00,4D,00,55,F7,8A,00,EF,55,55,8A,5CF 
790 DATA 04,eA,04,08,04.A2.55.08,5D.0O,0C,0O,4D,00,8E,2El 
BOO DATA OO,O0,OO,E7,00,59,51,04,A2,45,08,O4.8A,04,AA,3C0 
B10 DATA 04, 0B,8E,00,EF,00,FF, 00,50, 00.00, OO.OC, 00, A6, 397 
820 DATA O4,51,08,O4,AA,51,0fl,45,08,55,8A,45,A6,ÛB,OO,383 
B30 DATA 8E,00,4D,00,00,00,AE,00,DF,45,45,AA.04,6A,55,47F 
B40 DATA 08,00,DB,OC,00,04,4D,A2,00,F7,00,FB,00,A6,QQ,47A 
650 DATA 59,00,AE,00,55,08,55,A2,04,AA.OO,OC.DB,00,04,3F4 
860 DATA 8E,8A,00, 04, E7,A2,00,AE, 00,50,00,00,00,04,08,308 
B70 DATA 00, OC, E7, 00, 00, 4D.4D, 00,00, 00,00,00, 51, QC, 08, 1F2 
860 DATA OO,5D,OO,8E,00,EF,00,55,8A,O0,D8,0C,0O,00,00,3A0 
690 DATA 00, 00, 00,00, 00, 00,45, AE,6A, 00.51, 0C,A2. 00, 59, 2D5 
900 DATA 00. 04, A2,00,4D,AE, 00,00, 00, 00, 00,00, 00,00, 00.1A1 
910 DATA 00, 00, 00, 00, 04, DB, 08, 00, A6, 00,51, 08, 00,00, 00, 1E6 
920 DATA 00, 00, 00, 00,00, 00,00,00, 00, 00, 00,00, 00,45, 4D.092 
930 DATA AA,00,DF,00,45,AA,00,00,00,00,QQ,OQ,00,QO,QO,27B 
940 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
950 DATA 00,00,00,00,10,20,00,00,00,00,00,00,00,00,64,094 
960 DATA 98, 00,00, 00,00, 00, 40,00, 10,6C,4C,20, 00,80,00,260 
970 DATA 00, 04, 00, 64, 7F, BF.98, 00, 08, 00, 00,14, 00,64, 7B, 339 
980 DATA B7,98,00,28,00,00,15,ÛQ,44,38,34,88,00,2A,QO,2EE 
990 DATA 00.44,00,64,60,90,98,00,88,00,00, 10, 10.CC, 00,464 
1000 DATA C0.CC20. 50.00, 00, 40, 64, 6E, 90,60,90,98, 80, 00,583 
,9D,6E, 20, 00,00,64, 5D,6C,3A,4A9 
', 00,3F, BE.E2, 64, 98,01, 7D,3F, 00, 67F 
l,C4,71,F3,3C,OO,0O,40,C0,CO,8O,74D 
, 00, 10, 10, 9D, 28, 14, 6E, 20, 20, 00, 427 
,14,6E,20.88,OO,0O,OO,4Û,C0,AA,3ED 
,OO,0O,05,F2,OA,0S,F2,0A,00,O0,3AC 
l, 04,0F, 08, 00, 00, 00, 00, 55, OC, AA, 141 
,00, 00, 40, FF, 60, 40, FF, 80, 00, 00,489 
1, 00, CÛ, 00, 00, 00, 00, 00, 00, 00, 10, 190 
,00, 00, 00, 00, 64, 98, 00, 00, 00, 00, 11C 
, 4C, 20, 00, 60, 00, 00, 04, 00, 64, 7F, 2AF 
. 00, 14, 00, 64. 7B,B7, 98, 00, 28,00,309 



1010 DATA 00,10,9D,6£,64 
1020 DATA 35,9C,AE,98, 
1030 DATA 00,3C,F3,B2, 
1040 DATA 40,C0,C0,C0,00. 
1050 DATA 00,44,10,90,26 
1060 DATA 40, CO.AA, 00,00. 
1070 DATA 00,00,04,0F, 
1080 DATA 55, OC, AA, 00, 00. 
1090 DATA 00,00,00.00. 
1100 DATA 20,00,00,00,00. 
1110 DATA 00,40,00. 10.8C 
1120 DATA BF.98, 



2 6 ^^^^^M^m^^^m 



1140 DATA 90, 98, 00, 86, 00, 00, 10, 10, CC, C0,CÛ, CC, 20, 20, 00,528 
1150 DATA O0.4O,64,6E,90,60,9D,98,B0,OO,OO,iO,9D,BE,6+,536 
1160 DATA 98,9D,6Ë,20,00,ÛO,64,5D,6C,3A,35,9C,AE,96,00,541 
1170 DATA 0O,3F,BE,E2,64,98,Dl,7D,3F,OO,0O,3C,F3,B2.C8.711 
1180 DATA C4,71.F3,3C,00,OO.C0,C0,C0,8O,40,C0,C0,CO,QO,7A4 
1190 DATA 00,10,10,9D,28,14,6£,20,20,00,QO,44.10,9D,2B,2CÛ 
1200 DATA 14,6E,20,86,û0,0O,0O,40,C0,80,40,C0,B0,00,00,42A 
1210 DATA 00,00,AF,F2,OA,05,F1,5F,00,00,00,00,AF,F1,OA,4AA 
1220 DATA 05, F2, 5F, 00,00, 00,00, 84,0F, 08,04,0F, 46, 00, 00, 24C 
1230 DATA OO,OO,D5.OC.AA,55,OC,EA,0O,0O,0O,00,40,FF,80,495 
1240 DATA 40,FF, 80, 00,00, 00, 26, 00, 00, 44, 00,00, 00,51, 51, 2CD 
1250 DATA 00.5A.OA,OD.06,04.00,55,00,55,00,55,00,00,00,17C 
1260 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
1270 DATA 00,00,00,00,00,00,00,00.00,00,00,00,00,00.00.000 
1260 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
1290 DATA 00,Û0,ÛO,00.00,40,EA,OO,OÛ,00,0O,Û0,D5,5D,BO,2DC 
1300 DATA 00, 00,00,00, B4,OE,8O,U0, OÙ, IX), IX), AF,A5,AA,IXJ,J1U 
1310 DATA 00, 00, OO.FA, F2, AA, 00. 00, 00, 10, CC, 3E, 82,00,00,462 
1320 DATA 00,00, 30, 30,20, 00,00, 9D, 79, C4,3E,D1,3D, 88,64,492 
1330 DATA 3£,90,30.94,6E.20,10,9D,C4.3E,95,98,00.00.64,560 
1340 DATA 90,30, C4, 20,00, 00. 10, 9C.B6, 88.00, 00, 10, 10, 9D,44B 
1350 DATA 3D,98.10,00,44,10,64,6E,30,44,00,15,10,98,90,3CC 
1360 DATA 98, 15,00, 14. 30, 6A.C0, 34.34,00, 51, 96, 68, CO, 38,402 
1370 DATA D9, 00, 14, 30,62, 90,62,34,00, 15,00,09,79,88.15,549 
13B0 DATA 00,44,0O,64.6E,2O.44.OO,10,OO.lO,9O,00,10,0O,23A 
1390 DATA 00,00,00,00,00,00,00,00,00,00,00,00.00,00,00,000 
1400 DATA 00,00,00,00.00,00,00,00,00,00.00,00,00,00,00,000 
1410 DATA 00,00,00,00,00,00,00,00,00,00,00,00.00,00,00,000 
1420 DATA 00, 00,00,00, 00,00, 40,00,00,00,00, 00, 00, D5,5D,232 
1430 DATA 80. 00, 00,00, 00,AE,OE,AA.OO, 00,00,00. FA, F2,AA,47C 
1440 DATA 0O,O0,OO,10,CC.3E,B2,ÛO,00,OO,OO,30,3Q,20,0O,24C 
1450 DATA OO,9D,i , 9,C4.3E,Dl,30,B8,64,3E,9O,3O 1 94,6E.2O,632 
1460 DATA 10.9D,C4,3E,95,98,00,00,64,90,30.C4,20,00,00,4E4 
1470 DATA 10, 9C, 86,98,00, 00. 10, 10, 9D, 30,98, 10, 00, 44,10, 3F0 
1480 DATA 64,6E,30,44,00,15,1Û,98,90,98,1S,00,14,30,6A,3EE 
1490 DATA C0.3A.34,00,51,98.68,CO,38,D9,00,14.30,B2,90,SD6 
1500 DATA 62, 34, 00, 15, 40, D9, 79. C8, 15, 00, 44, 40, 64, 6E, 60,520 
1510 DATA 44.00,10,00,10,90,00,10,00,00,00,00,00,00,00,104 
1520 DATA 00.00,00,00,00,00,00,00,00,00,00,00,00.00.00,000 
1530 DATA 00,00.00.00,00,00,00,00,00,00,00,00,00.00,00,000 
1540 DATA 00,OÛ,QO,00,00,ÛO,ÛQ,D5,EA,40,FF,60,QO,40,AE,46C 
1550 DATA 5D,55,OC,EA.00,40,0D.0£,04,0F,46,00,55,5A,A7,3a4 
1560 DATA 05.F2,5F,00.55,5B,A5.05,F1,5F,00,00,40,CO,40,540 
1570 DATA C0,0Û,00,OO,0l,F9,Dl,A9,O0,OO,54,01,F9,Dl,A9,5FC 
1580 DATA S4,00,01,5A,E2,42.F2.0B,00,Q1,B5,F1.F9,A5,81,666 
1590 DATA 00,01.CO,5A,52,4A,ei,00,85,4A,03,A9,42,OF,80,464 
1600 DATA 5A,A5,FC,56,AD,F0,0A,F1,F2,03,81,52,F3,A0,5A,89E 
1610 DATA A5. 42, C0.07.F0.0A, 65.06, CD, CO, 81.0F. 80,01, B1.64A 
1620 DATA E8,CO,A9,81,00,01,40,56,FC,42,Ot,00.54,00,81,57D 
1630 DATA 03, 80, 54, 00. 00,00,01.49, 00, 00,00, 00, 00, 01.01, 183 
1640 DATA 00,00,00.00,00,00,00,00,00,00.00,00,00.00,00,000 
1650 DATA 00,00,00,00,00,00,00,00.00,00.00,00.00,00,00,000 
1660 DATA 00,00,00.00,00,00,00,00,00,00,00,00,00,00,00.000 
1670 DATA OO,40,80.OO,C0.0O,0O,0O,D5,EA,40.FF,B0,00,OO,4FE 
1660 DATA AE,5û,55,0C,AA,0O,0O,0D,0E,04,0F,08,OO,O0,5B,2A7 
1690 DATA A5,05.F2,OA,00,OO.CO.CO,40,CO,BO,00,00,01,F9,5AO 
1700 DATA 51,A9,0O,0O,54,Ol,F9,51,A9,54,0O,01,5A,E2,42,515 



1710 DATA 
1720 DATA 
1730 DATA 
17*0 DATA 
1750 DATA 
1760 DATA 
1770 DATA 
17B0 DATA 
1790 DATA 
1800 DATA 
1810 DATA 
1820 DATA 
1830 DATA 
1840 DATA 
1B50 DATA 
1860 DATA 
1870 DATA 
1880 DATA 
1890 DATA 
1900 DATA 
1910 DATA 
1920 DATA 
1930 DATA 
1940 DATA 
1950 DATA 
1960 DATA 
1970 DATA 
i960 DATA 
1990 DATA 
2000 DATA 
2010 DATA 
2020 DATA 
2030 DATA 
2040 DATA 
2050 DATA 
2060 DATA 
2070 DATA 
2080 DATA 
2090 DATA 
2100 DATA 
2110 DATA 
2120 DATA 
2130 DATA 
2140 DATA 
2150 DATA 
2160 DATA 
2170 DATA 
2 ISO DATA 
2190 DATA 
2200 DATA 
2210 DATA 
2220 DATA 
2230 DATA 
2240 DATA 
2250 DATA 
2260 DATA 
2270 DATA 
2280 DATA 



81,00,85, 
0A,F1,F2, 
85,0B,C0, 
40,56,FC, 
01.A9.00, 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00. 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00. 
00,00,00, 
30,30,30, 
30,CC,3F,: 

ce, ce, ce. 

3F, 3F. 3F, 
3C,3C,3C. 
3C,79,F3. 
F3,F3,F3, 
3C.3C3C, 
3F,3F,3F, 
3F.3C.3F, 
CC.CC.CC, 
30.30,30, 
00,00,00. 
00.30,00, 
AA.AE.5D, 
55,AA.OO, 
00,00,00, 
00.AA.04, 
AE,0D,A5, 
F1,F1,F2. 
F3,A5.5D, 
F2.OA.00. 
55.00,00, 
00,OÛ,AA, 
55,00,00, 
00,00,55, 
AE.AË.FF. 
0E.5A.OE, 
F2.5F.AF, 
0C,ÛF,50, 
5D.05.5A, 
0D.5A,F2. 
0F,OC,A4, 
5D.0E.FF, 
AE.AA.AA. 
00,00,00, 
00,00.00. 
00,00,00, 
00,00.55. 
00.AF.A5, 



4A,03,A9. 
03,81,52, 
CÛ, 81,0F, 
42.01,00, 
00,00,00, 
00,00,00, 
00,00,00, 
00,00,00. 
00,00,00, 
00,00,00. 



42,0F, 80. 
F3,A0,5A. 
80.01,81, 
54,00,81. 
00,01,01, 
00,00,00, 
00,00,00, 
00,00,00, 
00.00,00, 
00.00,00. 



5A,A5,FC. 
A5.42.C0, 
EB.C0.A9. 
03.80,54, 
00,00,00, 
00,00,00, 
00,00,00,: 
00,00,00, 
00,00.00, 
00,00.00 



00,00,00, 
00,00.00. 
00,00,00, 
00,00,00. 
00,00,00, 



00,00,00. 
00.00,00. 
00,00,00. 
00,00,00 
00,00,00. 



00,00,00,' 
00,00,00, 
00,00,00, 
00.00,00, 



00,00,00. 
00,00,00, 
30,30,30, 

cccc.ee, 
ce, ce, ce. 

3F, 3F, 3F, 
3C,3C,3C. 
F3.F3.F3, 
F3.F3.F3. 
3C,3C,3C, 
3F, 3F, 3F 

ce. ce, ce, 
ce. ce, ce 

30,30,30, 
00,00,00 



00,30,00, 
00,00,00, 
30,30,30, 

ce. ce, ce, 

3F.3C.3F, 
3F. 3F, 3F, 
3C,3C,3C, 
F3,F3,F3, 
F3.fl6.3C, 
3C.3C.3C, 
,3F, 3F. 3F. 
CC, CC.CC, 
3F, CC, 30. 
30,30,30, 
.00,00,00. 



00,00,00, 
00,00,00, 
00,00,30, 
30,30.30, 

ce, cc.ee, 

3F, 3F. 3F, 
3F,3F,3C, 
3C,3C,3C ( 
F3,F3,F3, 
3C,3C,3C, 
3C,3C,79, 
3F, 3F, 3F. 
CC.CC, CC, 
30.30,30, 
30, 30.CC, 
00.00,00. 



00.00,00. 
0D,0E,5A, 
00,00.00, 
AA,AA,55, 
AE.FF.5D, 
A5.5D,00, 
5F. 00, 00, 
,00,00, AE. 
00,AE,5A. 
.AE.FF.OD. 
.FF, 55,00, 
,00,00.00. 
,00.00,55, 
,5D,55,O0 : 
FF,AA,5A. 
,Û4.5A,F2 
,0D,F1.F3. 
F1.F1.F0 
A5.F0.0E. 
0F,5D,00 
55.00.AA. 
0Û.AA.00 



00.00,00, 
A5.F1.F2, 
00.00,00, 
OO.AA.OO, 
00.00.55, 
00.5D.5A, 
A£,SA,F3, 
5A.F3.A5, 
A5.A5.08. 
5D, 55,00. 
00.00.00, 
,00.00,00, 
OO.AA.FF, 
FF,5D,0C. 
0F.A5.F1, 
,F1.A5,0D. 
0F,F5,AE, 
,SF,D8,AE. 
5S,AF,F1, 
.OO.AE.OF. 
AE,AE,OD, 
,00.55,00, 



00,00,00, 
5A.A5,0D. 
00,00,00, 
55.55,55, 
A£,ÛE,OE, 
5A.A7.AE, 
FO.AA.OG. 
AA. 00,00, 
00.55.5D, 
55, 55. OC, 
ÛO.ÛÛ.AA, 
00,00,00, 
55,AE,AA, 
OD.OC.AA, 
0E,0C.55, 
FI, 05, OC, 
51.SA.F3, 
Q0.FQ,F2. 
A5.A4.0F, 
OF.OCAA, 
08,00,00, 
00.00,00. 



00,00,00 
00,00,00 
00,00,00 



5D, 00,00 
AA.00,00 



00,00,00, 
00,00,00. 
00,00,00, 
00,00,00 
00,00, FA. 



00,00,00, 
00.00,00. 
OO.OO.AA, 
AE.OE.AA. 
F2.AA.00, 



56,AD,F0,6BB 
07,FO,0A,75e 
81,00,01,675 
00,00,00,381 
00,00,00,OAC 
00,00,00,000 
00,00,00,000 
00,00,00,000 
00,00.00,000 
00,00.00,000 
00,00,00,000 
00,00.00,000 
00,00,00,000 
00,00,00.000 
00,00,00,000 
00,00,00.030 
CC,30,3Û,15C 
30.30,30,200 
CC.CC.CC, ACB 
3F.3F,3F,6FC 
B6,3C,3C,41F 
3C,3C,3C,384 
F3,F3,F3,DÛC 
3C,X,3C,8FF 
3C.3F.3F.3C7 
3F,3F,3F,3B1 
CC,CC,CC,A4A 
30,30,30,723 
30, 00, 00, 300 
00,00,00,000 
00,00,55,085 
0E,AE,5D,6D7 
00,00, 00, OFF 
OO.AA,00,3FC 
AA, 00,00, 481 
00.00, AF, 577 
0G,GD,F1,7C6 
,AF,F1,F0,7CF 
0D,OE,0E,431 
,AE.AA,AA,579 
AA, 00,00.352 
,00,00,00,055 
AA.55.00.4FF 
,55,OO,0C.5A6 
59.A4.GA.5E4 
F1,F3.F2,8CB 
F3,FO,ÛE,79D 
A7,0C,AA,7EF 
5D,AA,04,754 
AA,04,55,3B0 
00, 55,55, 4B4 
00,00.00,301 
00,00,00,000 
,00,00,00,000 
OO.OO.OO.OAA 
00.00,00,218 
00,00,00,494 



2300 DATA CA,BE,AA,OO,OO,55,5D,F7,5D,OO,O0,04,O0,FF,D5,5EO 
2310 DATA AA,04,00,55,FF,FB,F3,FF,FF,00.4D,E7.£7,CF,E7,9BF 
2320 DATA E7,0B,AE,DB,SE,OC,DB,8E,AA,55,4D,5D,FF,4D,5D,7CD 
2330 DATA 00, 40. A£,EA,CO,AE,EA, 00, 55, 55, CO.CO, 05,55,00,784 
2340 DATA 04,00,EA,EA,AA,04,00,45,00,5D,5D,08,45,00,51,423 
2350 DATA 00,8E,8E,8A,51,00,00,00,E7,E7,A2,QO,00,00,ÛO,467 
2360 DATA 04, BE, 00, 00, 00, 00,00, 55, 50,00,00,00, 00, 00,00.144 
2370 DATA 00,00.00,00,00,00,00,00,00,00.00,00.00,00,00,000 
2380 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
2390 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,000 
2400 DATA 00,00,00,00, AA, 00, 00. 00, 00. 00,55, 5D, 00, 00,00, 15C 
2410 DATA OO,OO,AE,0E,AA,O0,OO,O0,OO,FA,F2,AA,OO,O0,0O.3FC 
2420 DATA 00,40, 00,00,00, 00, 00, 4D,E2,48,E7,0B, 00, 00, AE, 414 
2430 DATA CA,CA,8E,AA, 00, 00, 55,50,F7, 50,00,00,04, 00, FF, 5D5 
2440 DATA D5,AA,04,00,55.FF,FB,F3,FF,FF,00,4D,E7 I E7,CF,9AD 
2450 DATA E7,E7,08,AE,Dfl,8E,OC,DB,8E,AA,55,4D,5D,FF,4.D,B57 
2460 DATA SD.OO^O.AE.EA.CO, AE,EA,OO,55.55,C0.C0,D5,55,7El 
2470 DATA 00,04, OO.EA.EA.AA, 04,00,45, 0O,5D,5D, 08, 45,00, 3D2 
2480 DATA 51,0O,8E,8E,BA,51,OO,OQ,00,E7,E7,A2,QÛ,O0,OQ,4BB 
2490 DATA 00, 04, 8E,00, 00,00, 00,00,55, 50,00, 00, 00, 00,00,144 
2500 DATA 00,00, 00,00, 00. 00, 00, 00,00, 00,10, 20, 64, 98, 9D.1C9 
2510 DATA 6E.3E.3D, 79, B6,3E.3D,9D,6E, 64, 98, 10,20, 41,82,580 
2520 DATA 93, 83,72,81, FI, F2, 72,81,93,63,41, 82,00,00, 00.6DB 
2530 DATA 00,00,00.00,00,00,00,00,00,00.00,00,00,00,00,000 
2540 DATA 00,00.00,00,00,00,00.00,00.00,00,00,00,00,00,000 
2550 DATA 83,82,00, 11, F3, 22, 00,50. 81,63.00,51, 33, 63,00, 4A6 
2560 DATA 73,33,33,82,72,33,33,82,72,33,63,82,33,33,63,506 
2570 DATA 82,33,33,63,82,33.33,63,82,11,33,63,00,11,33,463 
2580 DATA C3,00,11,63,82,00,00,C3,82,00,00,00,00,00.00,2FE 
2590 DATA 00,00,00,00.00,00,00,00,00,00,00,00,00,00,00,000 
2600 DATA 00,00, 00, 00, 00, 00, 00,00,00, F2,22, 00,50, F3, 63, 2BA 
2610 DATA 00,73,33,63,00,73,33,63,82,72.33,33,82,33,33,454 
2620 DATA 63.82,33,33,63,82,33,33,C3,82,33,33,C3,00,11,515 
2630 DATA 63,03.00. 41, C3. 82, 00,00, 03,00, 00,00, 00, 00, 00, 36F 
2640 DATA 00,00,00,00,00,00,00,00,00,00,00.00,00,00,00,000 
2650 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00.000 
2660 DATA 00, 00, 00, FI, El, 00, 50,83, 33,82, 50. B3, 33,82,33, 575 
2670 DATA 33,33,63,33,33,33,63,33,33,33,C3,33,33,33,C3,47D 
26B0 DATA 11,33,63,82, 11, 33,63,82,00.63, 03,00,00,00, 00,308 
2690 DATA 00,00,00,00,00,00,00,00,00,00.00,00,00,00,00.000 
2700 DATA 00,00.00,00,00,00,00,00,00,00,00.00,00,00,00,000 
2710 DATA 00,00,00,00.00,00,00,00,00,00,00.00,00,00,00,000 
2720 DATA 00,00,00,00,00,00,00,00,10,30,30,30,30,00,64,134 
2730 DATA CC,CC,CC,CC,20.9D,3F,3F,3F,3F,88,3E,3C,F3,B6,794 
2740 DATA 3C,2A.Cû,60,CÛ,CÛ,6û,6Ù,6G,C8,Cû,CÛ,C6,2Û,CB,63E 
2750 DATA 6A.64,60,6A,88,C8,68,9D,C8,68.B8,6A,E2,3E,6A,799 
2760 DATA E2,2A,68,6E.79,6C,6A,28,E2,C0,C0.C0,C0,A2,68,845 
2770 DATA 6E.79,6C,6A,28,6A,E2,3E,6A,E2,2A,C8,68,9D,C8,77A 
2780 DATA 68,ae,C8,6A,64,60,6A,B8,60,C8,C0,C0,C8,20,C0,828 
2790 DATA 60,CO,CO,60,80,3E,3C,F3,B6,3C,2A.9D,3F.3F.3F,6A3 
2800 DATA 3F.88,64,CC,CC,CC,CC,20.10.3û,30,30.30,0O,O0,54B 
2810 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00.00,00,000 
2820 DATA 00. 00, 00, 00,00, 00, 00,00, 00, 03, 00, 00,01. DB, 02, 0E1 
2830 DATA ÛO,01,FC,B1,02,00,42.47.A3,01,42,FC,DE,53,EB,604 
2840 DATA 56,FC,47,A3,03,A9,FC,DE,81,03,FC,A9.81,DE,56,8AÛ 
2850 DATA 03, D4.F9, 01, 42, 81, FC, 00, 01. 42.03.00, 47, A3,00,4CO 
2860 DATA 00.56. A9, 00, 00, 01, 02,00, 00, 00, 00. 00,00, 00, 00, 102 
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GNASHER 



) et moi, le chef. Autour de ces trois | ,, 

1e Foxxy, Coke au nutt, Billyjo, ou même les lecteurs, qui ont. honneur suprême, le droit d'écrire 

HER. 

Il est édité avec OXFORD PAO 4.7 (wïth a little help from OCP). Sa parution, pour l'instant assez irrégulière, 
deviendra bimensuelle à la rentrée. Rassurez-vous, on file pas notre photo à chaque numéro, c'est juste 
pour finir l'année scolaire en beauté ! L'année prochaine, (je parle toujours en années scolaires...) Gnasher 
risque de prendre du poids ou plus concrètement (en un ou deux mots, comme on veut) une deuxième 
page. 

Voici quelques trucs qui informeront votre intelligence supérieure et qui l'aideront si besoin est à compi 
dre ce zine {car le dossier freeware, je doute que vous connaissiez ces programmes à Paris !) 
• BAHUT est un freeware d'aventure qui fait figure de pionnier dans la région. 
" ' irmation de Centurio, un cracker local. 



GNASHER - 64 rue Jean Jaurès - 76550 OFFRANVILLE 
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rt tous ça !). peut-être pas épais pour un premier nurr ..... 

' ' AMSTRAD 61 28. 664. 464 est édité sur un 61 28 Qweitv + 
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LE RETOUR DU STRAD VIVANT 



Alors là, je m'interroge. Pourquoi le mot fanzine est-il employé < 

justement. Pourtant il me semble que fanzine vient de magazine et que magazine esr au m 

Sur la seule et unique page du Retour du... il y a beaucoup (trop?) de dessins tirés de Stop Pn 

2000 et le 61 28 sont parfaits mais Hervé trouve que le logiciel AMX est bien lent à imp rim ' : ' ■ ■ 

comme les autres Freeware (les vrais) le Retour du Strad vivant est gratuit (2.20 F en tir 

port quand même). 
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jÏÏI RedMisur M chef 

BUS'S ÎRHNïStdKlwr 
. | LI MTHIIL ÏÏTÎUMl, 

m mi ««ER, DM 2166, CPC 61!! 




CAÏMAN 



5-titre : «La qualité. L'innovation. 

I. uiuvcpasâ me rappelé -'-- 

& CPC est la meilleure revi 

:, Bug's Bunny et !D se d 
vtations sont foi' - " 
.DMP 2160 et CPC 6128. Si. 
dessins et textes est plutôt bien réc 
ça lasse. A signaler un concours dans ce 



îumour.». ce qui évoque irrésistiblement quelque cho._ .. 
~i. Enfin le principal est que les auteurs reconnaissent qu'Amstar 
isserez me voir dans mon bureau les petits gars : NDLR). Titi , 
: des 4 pages double tace double densité du Caïman. Les 
o et le matériel utilisé est des plus classiques : AfvlX Page 
je trouve que l'équilibre entre 
autant de polices de caractères : 
iméro 1 (trop tard pour y participer, mais la prochaine fois...). 



239 avenue du Vignau - 40000 Mont de Marsan. 
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— mima - 

Salut a tous les branches du jcustick, Ce fin; n'est m entièrement neuf. 1! est su fait la suite de ce cher BLOS 
nia . Hais celui-'-- i i isseï lecteurs , Donc I assaut syee une nouvelle rédaction,, 

. . ■■;. .■ 

.dont je vous reparlerais dans ! .rti' 

■ a notre cour*" en "ERSOHNI 6 =o rra attaquer un fasi qui est le 

| plus féroce qui existe sur ie «arche . j^jj 

la nouveauté ???!!! Ou ca V. 1 

■ ■ . ; . ■ \ ■■- . . . . ■ 

1 POUGUOÏ Un Ho lero ? ? ? Car pour être bon , il faut être plusieurs donc voici l'annonce qu: o espère sera entes^. 
de vous tous ! ^ ^^,,0^ jgg pROGSArtNEURS SUE SÎ,&*IGA,PC et CFC Pê-ur écrire des articles et crée: des 
' M0S ' NOUS RECHERCHONS DES TESIEURS POSSEDANT HEMS , voir PREUIEHS SUR SI , AKICA , PC et IHCHSON 

' P.S. ; pour le salaire téléphone! nous a la rédaction au (16) Êfl-7S-8i-78 demander DAIM) 

TM i uni sadete de Transports it m TRES 



i La société ie Messageries Routières 1*1. est notre SPOHEÛB. vous h direi que peut faire WM4tf.b J« ns « 

l dan' l'informatique , Et b en , et peut offrir des ots , des perifhcnçiiss , nr. ... Et , grâce a T.fl.D, , nous ih 

mff"Mmùmmi notre DHP 11», Extra mWhIm nM.ti PuHui HssiH dans les mmh 

! suivants (celle-ci sera nodifie au cours de notre évolution, ) Sono longue vie a T.H.P. ■ WICROSCHOOL et au SEMlili 
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Hci , je fais livrer nés os ! 

ur les ÎSANSPORTS MAURICE i 

'ESfiUÏEKS , c'est rapide et i 

serve bien les os ! ! ! ! 




MICRO SCHOOL 



. . _ z un 61 2fl et le logiciel AMX, ce n D comporte que 3 
. Nous sommes pour l'instant 5 à la rédaction, Blood, moi le chef quoi ! Duffy 
Fanz qui traite des Ducks euh ! Fanzs ! Druffy et Thomaswohe. la musique sur ordinateur, l'aventurier jeu sur 
CPC, et Gogol le Mong euh... jeu sur Amiga. Normalement on devrait être, en moyenne, 10 mais,,. Saviez- 
1 Monrhly change, encore en I AM-MAG, que de changements, 
i de 35 F et le prix d'un n° de 5,90 F (3,70 + 2.20 F). 



CPC : David DESQUIENS- 168. rue 




Ne vous est-il jamais 
venu à l'idée de vouloir 
convertir un dessin d'un 

mode dans un autre ? 

C'est certes possible avec 

certains programmes de 

dessin, mais le résultat 

est décevant car le 

programme se contente 

de faire des pixels 

plus grands ! 



10 HODE 2:PEINT 'TRANSHOD - CHARGEUR ' 
20 HEHORÏ &c9FFF:L=100 
30 FOR l=iAÛ00 T0 J.À216 STEP 8 
40 S0H=O:F0E J=0 T0 7 
50 fiEAD A«:A=YAL["!."+A»):PÛKE l+J,A:SÛH= 
GO WEXT J 

70 EEAD A*:A=VALCV+At);IF AOS0H THEN 
;L:END &SE PEINT "L1GKE" ; L i "0K. * 
60 L=LH0:NEIT I 
00 SAVE 'TEAAS", fi, fcA000,fc211 
100 DATA OO,O4,O4,54,O8,OC,0C.5C.OD8 
110 DATA 08,OC,OC.5e,A8,AC,AC,FC,37B 
120 DATA 40,44.50,01,48,40,58.09, ICA 
130 DATA 48,4C,58,09,E8,EC,F8,A9,46A 
■ 140 DATA 40, 50,44, 01, 48,58, 4C,09, ICA 
150 DATA 4B,5B,4C,09,EB,F8,EC,A9,46A 
1G0 DATA 10,14,14,41, 18, 1C,1C,49, 112 
170 DATA lB,lC,lC.49,ae,BC,BC,E9,3B2 
180 DATA 80,84, 84,04, 86, eC,8C,DC,4D8 
38 



PEINT "ERREUR LIGNE' 



190 DATA A0. 
200 DATA C0 
210 DATA EO. 
220 DATA CO. 
230 DATA EO. 
240 DATA 90. 
-250 DATA BO, 
260 DATA 80. 
270 DATA 88, 
280 DATA CO. 
290 DATA CB, 



A4, A4, F4, 02, 06, 06, 5G,340 
C4,D0,81,C8,CC,D8,B9,5CA 
E4,FÛ,A1, 42,46, 52,03, 432 
D0,C4,81,C8,D8,CC,B9,5CA 
F0.E4. Al, 42,52,46,03,432 
94,94,C1,98,9C,9C,C9,512 
B4,B4,E1, 12, 16, 16,43, 37A 
84,84,D4,A0,A4,A4,F4,53B 
8C,BC,DC,02,06,06,56,2EÛ 
C4,D0,B1,E0,E4,F0,A1,62A 
CC, 08,89, 42,46,52,03,302 



Valable pour 
S CPC 464 
H CPC 6Ô4 
S CPC 6128 



C'est pourquoi j'ai mis au point 
Transmod. Il permet de con- 
vertir le mode 2 en mode 1 , 
et le mode 1 en mode O. Mais dans 
le nouveau mode les pixels sont 2 fols 
plus grands que dans l'ancien, donc 
il contient 2 pixels de l'ancien mode. 
Pour résoudre ce problème, le pro- 
gramme s'occupe de calculer les 
couleurs Intermédiaires. 



FONCTIONNEMENT 
DU PROGRAMME 

• Choix du mode 

- mode 2 vers mode 1 ou 

- mode 1 vers mode 

• Catalogue, puis demande du nom 
de l'image. 

- S'il s'agit d'une mauvaise disquette, 
on tape (RETURN] directement. 

• Demande des couleurs. 

• Conversion de l'image dans le mode 
choisi. 

• Affichage des nouvelles couleurs. 

• Demande sauvegarde nouvelle 
image. 

• Demande conversion autre Image. 



Olivier BRUNET 



■ 300 DATA CO. 
. 310 DATA C8, 
. 320 DATA 90. 

■ 330 DATA 90, 
340 DATA 20 

. 350 DATA 26, 
- 3S0 DATA 60. 
370 DATA 68, 
. 380 DATA 60. 
390 DATA 68, 
400 DATA 30. 



D0,C4,B1,E0, 
D8.CC, 89,42» 
94, 94, Cl, BO. 
9C,MC,CU,1^, 
24,24,74,28 
2C,2C,7C,B2, 
64,70,21,68. 
6C,78,29,C2. 
70,64,21,68. 
78,6C,29,C2, 
34,34,61,38. 



F0,E4,A1,62A 
52,46,03,3D2 
B4,B4,E1,572 
lb,lb,4d,31A 
2C,2C,7C,1D8 
86. 86, D6, 360 
6C,78,29,2CA 
C6,D2,83,452 
78,6C,29,2CA 
D2,C6,83,452 
3C,3C,69,212 



k WUO 

420 
430 
440 
450 
460 
N* 470 
4B0 
490 
500 
510 
520 
530 



^ 5 



DATA 38, 3C, 
DATA 00,10, 
DATA 20,30, 
DATA 40,50, 
DATA 60,70, 
DATA 40,50, 
DATA 60,70, 
DATA 04,14, 
DATA 24,34, 
DATA 60,90, 
DATA AO.BÛ, 
DATA CO.DO, 
DATA EO.FO, 
DATA CO.DO, 
DATA EO.FO, 
DATA 84,94. 
DATA A4.B4, 
DATA S0,90, 



92,96.96,C3,39A 
20, 30,30, 21, 0C2 
02,12,12,03,OCA 
60,70,70,61,202 
42,52,52,43,2CA 
60,70,70,61,21:2 
42, 52,52, 43, 2CA 
24, 34,34,25, 0E2 
06,16, 16,07, OEA 
A0,BO,flO,Al,4C2 
82,92,92, B3,4CA 
EO,FO,FO,E1,6C2 
C2,D2,D2,C3,6CA 
E0,FO,F0,El,6C2 
C2,D2,D2,C3,6CA 
A4,B4,B4,A5,4E2 
86, 96, 96,87, 4EA 
A0,BO.BO,A1.4C2 



590 DATA A 
600 DATA C 
610 DATA E 
620 DATA C 
630 DATA E 
640 DATA f 
650 DATA A 
660 DATA C 
670 DATA 2 
680 DATA ù 
690 DATA 6 
700 DATA 4 
710 DATA 6 
720 DATA C 
730 DATA 2 
740 DATA 2 
7S0 DATA 
760 DATA C 



,BO,BO,A1 
,DO,DO,C1 
,FO,FO,E1 
, DO, DO, Cl 
,F0,F0,E1. 
,94,94.85 
,B4,B4.A5. 
,18,18,09 
,38,38,29, 
,58,58,49 
,78,78,69, 
,58,58,49. 
,78,78,69, 
, 1C.1C.0D. 
,3C,3C,2D, 
,00, C0,01, 
,77,23, 3E, 
,00.00.00, 



,82, 92,92,83, 4CA 
,E0,F0,F0,E1,6C2 
,C2,D2,D2,C3,6CA 
,E0,FO,F0,E1.6C2 
,C2,D2.D2,C3,6CA 
,A4,B4,B4,A5,4E2 
86,96,96, B7.4EA 
.28,38,38,29,102 
ÛA,1A,1A,OB,10A 
68,78,78,69,302 
4A,5A,5A,4B,30A 
6B, 78.78,69,302 
4A,5A,5A,4B,3ÛA 
2C,3C,3C,2D,122 
0E,1E,1E,0F,12A 
00,AO,7E,4F,24F 
00,BC,20,F6,2B4 
00,00.00,00,009 



GAGNER AU LOTO 

un rêve qui peut devenir 
réalité avec 

loto - MATIC 

le programme qui vous révèle 
tout ce que vous devez savoir 

• trouverfacilement les numéros 

qui ont le plus de chance de sortir 

• établir scientifiquement 

les grilles les plus performantes 

grâce aux tests du Lotoscope 

• contrôler sans peine 

les résultats de vos jeux 

Editions écran et imprimante 

Documentation détaillée 

+ CADEAU contre4timbres 

INFORMATIC Applications 

B.P. 78- 6780.0 BISCHHEIM 

Tél. 88.33.58.85 



T H A N S H Q D 



*, 



f OLIVIER BHUNET 






*. 



d^lEHORY fc9FFF;L0AD "TRANS", 



TRANSHOD BOUCLE PRINCIPALE * 



100 ' 

110 'HtlHIIIHIIIHIllIHHmilIII 

120 MODE 1:INK 0,0:INK 1,1B:BÛBDE8 0:INK 2,6 
130 LOCATE 16,2:PRINT "TRANSH0D" 
140 LOCATE 1.4:PEINT 'par D. Brunet" 
150 PEU 2:LQCATE 10,10;PfilNT "1. Mode 2 vers Hode 1 
, 160 LOCATE 10,12:PRINT "2. Mode L vers Mode 0" 
170 LOCATE 10,15:PRINT "VOTRE CHOIX :'; 



X>LA 
\ )LB 

\ >LC 

\ >LD 

A >LE 

> >LF 
N >LG 

->OJ 

\>U 

v >RB 
\>RC 
\ >KU 
\>BH 
VHA 
" \>Z\3 
*VtH 



î AI=UPPUI(l(IŒY*):iF AtO'l" AND MO'2" THEN 180 \>UM 



190 PRINT Aï; 




\>KJ 


200 MODE 2:PEN 1 




VBB 


210 CAT 




N)RH 


220 INPUT "Noi de J ' iaaee a charger 


VMM 


■^ >UF 

>PF 


230 IF IMAM" THEN 20û" 




240 IF LEN<A»J>12 THEN 200 




X)ÎH 
>VE 


250 LOCATE 1,20: INPUT "Couleur IFor 


t) :",IN(0) 


260 LOCATE 1,21: IMPOT "Couleur i 


:MN(1) 


IF A$= >DB 


■1" THEN CQL=2:G0T0 290 




\ 


270 LOCATE 1,22: INPUT "Couleur 2 


:",IN(2I 


~\>TJ 


280 LOCATE 1,23: INPUT "Couleur 3 


:",1N(3) 


C0L=4\>AQ 


290 FDR 1=0 TO C0V1 




\>NV 


300 J(Ul) = INT(IH(I)/9) 




\)BC 


310 RU + l) = INT<(IN(I)-J(hl)i91/3l 




^ >AA 


320 B(Itl) = INTHIN(l)-R(IH)i3-J(Ull 


i9)l 


\>HH 


330 1NK I.INII) 




V>VG 


340 NEIT 




\>EC 


350 IF A»="l" THEN HODE 2 ELSE HGDE 1 




\>BB 


360 CALL iBCO6,tCO:L0AD IMAt.iCOOO 




\ >AK 


370 CALL &BB1B 




\>HF 


380 CALL tBC06,if40:HQDE 1 




\ >RP 



"INK I ; 



\>LU 
\ >JH 

N >vu 

\>MF 
N>LG 
.' >JB 
\ >HU 
il )UH 






390 PEN 1-PRINT "C'EST BON ?•; \ >ïï 

400 St=UPPER*(]NKEY$):lF S*<>"Û" AND SfO'N" THEN 400 >tf\ 

410 IF S*="N" THEN GOTO 200 >TY\ 

420 IF A*="l" THEN MODE kPOKE &A205,fcAl ELSE HODE 0:P0 >JP\ 

KE fcA205.feAO 

430 CALL iBCffi.fcCO 

440 CALL tA200 

450 ON VALIA») GOSUB 590,630 

460 CALL tBBlfl 

470 CALL &BC06,i40 

480 HODE 2 

490 INK 1,0: INK 0,26 

500 IF A$="l" THEN FOR 1=0 TO 2:PRINT USING 

;:PRINT IK(li:NFJIT 

■ 510 IF A*="2" THEN FOR 1=0 TO 9:PR1NT USING "INK tt 
I;:PRINT IKUhNEXT 
520 PHI NT 

530 PRINT "SAUVEGARDE DE L'ECRAN :"; 
540 A*=UPPERKINKEYi>:IF AïO'O" AND A$<)"N" THEN 540 E >KL 
LSE PRIHT A* *— ^* 

v 550 IF A*="0' THEN INPUT "NOM :";A*:SAVE Aï,B,4CO00,U >2U 

ooo — 

■ 560 PRINT "AUTRE IMAGE :"; \ >CP 
570 At=UPPER»(INKEY$):IF A$G"Û" AND AïO'N" THEN 570 E >KT 
LSE PRINT AI ' v — 

"sffiJlF A*="0" THEN CALL IBB18:G0T0 120 ELSE END >fll 

590 C0L=iNT((B(l)+B(2l)/2H!NT<(r(l)+r<2JI/2H3+INT(U( )NH 
D+J(2))/2)t9 ^s- 

600 IK(OI = IN<0):IK{1)=COL:IK12I = INU) >)Etf 

610 FDR 1=0 TO 2:1NK 1, IKCI) :NEXT \ >AN 

620 RETURN \ > ZD 

630 RESTORE 690:FOR ENC=0 TO 9 \ >n 

640 READ H,12:ll=IM:i2=l2tl \ )(z 

650 C0L=iNTt(B(ll)+B(I2ïî/2) + LHTt(rtU>+r(ï2ïî/Z)*3+IHT >YU 
(<J(li)+J(12))/2t*9 ' *— 

660 IK(ENC)=CÛL:INK ENC.COL V >ïA 

670 NEÏT ÈNC V > GF 

680 RETURN \ )Z k 

690 DATA 0,0,0.1.0,2,0.3,1,1,1.2,1,3,2,2,2.3,3,3 \ >HH 
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ÏCAO SUR CPC 

t, INVERSION DES FACETTES 
| ORIENTATION AUTOMATIQUE 
I DES FACETTES 



Pour recevoir les logiciel de 
J.P.PEÏIT, expédiez à l'adresse ci- 
après : 

Jean-Pierre PETIT, 
Chemin de la Monîagnère, 
84 120 Pertuis, Vaucluse. 

7 - Logiciel AMSTRAD-3D (Images 
fil de fer) : 90 F. 

2 - Livre CAO sur AMSTRAD (260 pa- 
ges) : 200F. L'ensemble (1+2) : 
250 F. 

3 -Logiciel SUPER-AMSTRAD-3D 
(parties cachées éliminées) : 250 F. 

4 - Objets précalculés pour Super 
Amstrad-3D :80F. (3+4) : 300 F 

5 - Ensemble (2+3+4) : 500 F (plus 
que 30 livres disponibles). 

Grâce à l'obligeance de messieurs 
VlbertetVERFAY, AMSTRAD-3D et 
SUPER-AMSTRAD-3D sont disponi- 
bles sur 464. Remarque : nous 
n 'avons pas dé versions sur 664 dis- 
ponibles. 



Lorsque j'ai voulu il y a 

quelques années créer 

un objet en forme de 

dodécaèdre, cette espèce 

de boîte à douze facettes 

pentagonales, je n'ai 

pas trouvé un livre de 

mathématiques avec 

les coordonnées des 

sommets. Je m'étais 

donc débrouillé en 

jouant sur les symétries 

et les rotations. J'avais 

fabriqué tant bien que 

mal une facette, puis je 

l'avais fait tourner, etc. 



9 e m'étais trompé dans les orien- 
tations des facettes, ce qui ap- 
parut dès que je fis une image 
avec élimination des facettes non 
vuesà l'aide de ia section VOIR. J'ai 
d'abord obtenu une image fil de fer 
où ce type d'erreur ne pouvait appa- 
raître. (Pour visualiser le résultatde ce 
travail, au point de vue du fichier : voir 
tableau des points de l'objet DODE- 
CA1). 




Figurel -ImagefildeferdeDODECAJ. 



Mais tout s'est gâté lorsque J'ai 
voulu éliminer les parties cachées : 




LA SOLUTION 

La solution va consister à créer un 
système, sous forme de sous-program- 
me, qui mette ces fichues facettes en 
ordre automatiquement. Avant d'en- 
visager cela , nous allons traiter un pro- 
blème préalable, celui de l'Inversion 
des facettes d'un objet. 

Nous savons que sur ce que nous 
appelons un SOLIDE, c'est-à-dire un 
polyèdre convexe, les facettes sont 
orientées selon la règle du tire-bou- 
chon. 




Figure 4 - Facettes 



i» éliminées 
de l'objet. 



Oubli de facettes, mention de fa- 
cettes qui ne devraient pas figurer, il 
est clair que les orientations étaient 
mauvaises. 

J'Incite d'abord le lecteur à ren- 
trer ce fichier (erroné) à la main, se- 
lon : 

RUN-M0D1 
a - Créer un objet 
a - Créer chaîne par chaîne 
Type d'objet: 
d - Solide 
a- Saisie clavier 

SAISIE DE CHAINES AU CLAVIER 

Nombre de segments ? 5 

Arêtes virtuelles en début de chaîne 

Leur nombre ? 

Point numéro 1 

XT=7- 0.303 

YT=? .934 

ZT=?-0.1S7 

Point numéro 2 

etc.... 

J'ai voulu corriger ce fichier à la 
main en essayant de réfléchir aux err- 
eurs commises mais le remède fut pire 
que le mal. J'ai donc du demander 
à l'ordinateur de faire lui-même cette 
mise en ordre en créant une routine 
ad hoc, Et cela sera le sujetde la pré- 
sente leçon, Suivez-la avec attention, 
c'est une des plus intéressantes. En tout 
cas. une fols cette routine créée J'étais 
débarrassé séance tenante de ce pé- 
nible problème de l'orientation des fa- 
cettes pour les solides, les polyèdres 
convexes. 

42 




Figure 3 - Orientation des facettes seloi 
règle du tire-bouchon. 



On pourrait se demander quel In- 
térêt peut présenter une telle option. 
En effet si Je prends un objet et que 
Je le traite de cette façon, lorsque je 
voudrai éliminer les facettes non vues 
l'ordinateur me présentera les faces 
Internes et non externes ! 

Dans la suite de notre travail nous 
étudierons, comme dans AMSTRAD- 
3D, la façon de manipuler les objets. 
L'une d'elles consiste à prendre le sy- 
métrique de l'objet par rapport à un 
plan, 



facette 
convenablement 




Figure 5 • Changement 
r es utiat d'une symétrie par rapport 



Lorsqu'on parcourt la facette (in- 
dice J sur la chaîne) et qu'on assimile 
cette rotation au mouvement de vis- 
sage du manche d'un tire-bouchon, 
celui-ci doit pointer vers l'extérieur de 
l'objet pour toutes les facettes sans 
exception. 

Si nous inversons les facettes, ses 
sens seront comme ceci. 



C'est une opération tout à fait utile 
et souhaitable mais, si vous y regar- 
dez de près, elle Inverse les facettes ! 
Il faut donc aussitôt créer un sous-pro- 
gramme de remise en ordre de cet 
objet, sinon II deviendra inutilisable. 

Une petite remarque au passage, 
destinée à Illustrer le peu de perfor- 
mance du cerveau humain au sujet 
de ces symétries (ce qui nous fait nous 
perdre si aisément dans les galeries 
des glaces des fêtes foraines) : Une 
symétrie par rapporta un point lr 
t-elle les facettes ? Réponse dans 
leçon consacrée à ces symétries. 



INVERSER UN OBJET 

Comme la manipulation d'objets 
se situera dans la section MOD2, c'est 
dans celle-ci que l'on placera cet utili- 
taire et l'action clavier :n-lnverser ob- 
jet ou btoc entraînera un chaînage 
en direction de MOD2. Ce qui corres- 
pond à la ligne, dans MOD1 : 

217IFC= 14THENCHAIN»MOD2 

n est en effet la quatorzième let- 
tre de l'alphabet et vous savez que 
notre programme de saisie de carac- 
tères 65000 renvoie, dans le registre 
C, le rang alphabétique de la lettre. 

Je vous renvoie donc au listing de 
MOD2. L'exécution de la tâche cor- 
respond à la ligne : 

224 IF C = 14 THEN GOSUB 1000 : GOTO 
10 

L'inversion de facette est donc pri- 
se en charge dans le sous-programme 
1 000. Le lecteur trouvera dans ce sous- 
programme des appels de sous-pro- 
grammes Inexistants, liés à des valeurs 
de flags. Le flag FB se réfère par exem- 
ple au Traitement par blocs d'objets. 
C'est une chose que nous n'avons pas 
encore définie. Dans l'utilisation que 
nous faisons de MOD2 aujourd'hui le 
traitement par blocs sera négligé, 
donc ce flag FB sera positionné à zéro 
lors du questionnement : 

INVERSER 

a • Objet 
b-BIcc 

Votre choix : 
et qui correspond à la ligne 1000. SI 
le choix se porte sur la sous-option a 
le programme renverra à la ligne 
30000. 



Une parenthèse sur le programme 
30000: 

Ce sous-programme 30000 sera pré- 
sent dans à peu près toutes les sec- 
tions de la chaîne de traitement SU- 
PER-AMSTRAD-3D. On y fera référence 
à chaque fois qu'on se proposera d' 
Intervenir sur un objet. SI vous détaillez 
ce sous-programme vous verrez qu'il 
traite tous les cas possibles. SI L = - 1 



c'est qu'il n'y a pas d'objet en mé- 
moire. Vous n'en avez pas chargé ou 
créé. 

C'est ce qui se passera si vous fai- 
tes : 

• RUN-MOD1 

n - Inverser objet ou bloc. 

Le sous-programme enverra alors à la 

ligne 5005 (chargement d'objet) , et 

vous verrez apparaître ; 

Chargez l'objet (disquette objet L.) 
Nom de l'objet:? 

qui vous rappellera à l'ordre. 

Si vous avez chargé un objet selon la 

procédure : 

■ RUN»MODl 

d- Charger objet 
Nom de l'objet ? DODECA1 
n - Inverser objet ou bloc 
a - Objet 

L'ordinateur vous demandera : 
Objet résident DODECA1 
on garde ? 

Vecteurs normaux 



objets sont des ensembles de facet- 
tes (Indicées par le registre I), Les blocs, 
dont nous parlerons en détail plus loin, 
sont des ensembles d'objets Indicés 
par le registre K. 

Lorsqu'on veut opérer sur un bloc 
on enfermera la double boucle ba- 
sée sur les Indices I et J dans une bou- 
cle d'Indice K («Pour tous les objets 
correspondant à K allant de O à E»). 
Comme Ici nous ne traitons pas de 
blocs (FB = O), nous éliminerons cette 
boucle supplémentaire grâce aux 
Iignes1010etll70). 

Il reste l'opération fondamentale 
d'Inversion d'une facette qui corres- 
pond aux lignes 1050 à 1140. Le pro- 
blème se complique un peu s'il y a 
une arête virtuelle (qui n'apparaît pas 
au traçage sur écran). Nous savons 
que cette arête virtuelle doit néces- 
sairement figurer en tête de chaîne. 
S'il n'y a pas d'arête virtuelle, on se 
contentera simplement d'Inverser le 
sens de parcours des points. Sinon il 
faudra opérer un décalage, ceci 
étant illustré sur la figure 5 bis. 




Ceci afin de vous fournir une véri- 
fication de ce que vous vous propo- 
sez de manipuler. 

Enfin si vous avez créé un objet que 
vous n'avez pas encore stocké, donc 
qui ne possède pas encore de nom, 
vous verrez apparaître : 

Objet sans nom présent en mémoire 
On garde ? 

Tout cela grâce â ce sous-pro- 
gramme 30000, Fin de cette paren- 
thèse, 

En 1010 vous avez un autre gad- 
get fort utile qui permet Indifférem- 
ment de travailler sur ies objets ou sur 
les blocs. Les facettes sont des ensem- 
bles de points chaînés (Indice J), Les 



L'écriture de programmation cor- 
respond à la traduction la plus com- 
pacte de cet algorithme d'inversion 
de facette. 

SI vous créez sur disquette les sec- 
tions MOD1 , MOD2, VOIR, puis l'ob- 
jet DODECA1 . et que vous l'inversez, 
vous obtiendrez l'Image de la figure 
4, SI vous comparez a-vec celle de la 
figure 2 vous verrez que ce qui était 
vu est devenu non vu et vice versa. 

. Au passage vous comprendrez 
que nous ferons un appel du sous-pro- 
gramme 1000 lorsque nous voudrons 
prendre le symétrique d'objets de ty- 
pes solide ou graffiti (pour les objets 
fil de fer ou coques cela n'est pas utile, 
les premiers sont non Cachants et les 
seconds n'ont ni extérieur ni intérieur 
définis). 
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REORIENTATION 
AUTOMATIQUE 
DES FACETTES 

Ceci se trouve cette fols dans 
MOD1 . Référez-vous au listing corres- 
pondant. La procédure de stockage 
d'objet constitue le sous-programme 
8000. Nous trouverons une ligne sup- 
plémentaire : 
8022 IFTYPE(K) = A THEN GOSUB 38000 

En clair : si l'objet est de type «so- 
lide», effectuer une vérification de 
l'orientation de ses facettes. 

En 8020 II y a eu appel du sous- 
programme 44000. donc les coordon- 
nées du centre de gravité de l'objet 
ont déjà été calculées et se trouvent 
dans les registres : 
GX(K) 
GY(K) 
GZ(K) 

SI un observateur était situé exac- 
tement au centre de gravité de l'ob- 
jet, il serait à l'intérieur de celui-ci (c'est 
un polyèdre convexe). Donc, pour lui, 
toutes les facettes devraient être «non 
vues». Cet observateur fictif va donc 
appliquera chaque facette ce critè- 
re «vue, non vue» et donner l'ordre 
d'Inverser la facette quand II la trou- 
vera «vue», 

Ce sous-programme est un mélan- 
ge de ce que nous avons expliqué à 
la leçon précédente et de ce qui vient 
d'être dit à propos de l'Inversion d'ob- 
jets. Pour savoir si la facette est vue 
on calcule le produit scalaire MG . N. 
où M est le point d'observation, G le 
centre de gravité de la facette et N 
son vecteur normal, calculé selon le 
produit vectoriel des deux premiers 
vecteurs arêtes de la chaîne. Si ce pro- 
duit scalaire est positif on déclenche 
le sous-programme 29000 qui Inverse 
la facette. 



MANIPULATIONS 
SUGGEREES 

Après avoir mis sur disquette les trois 
sections de programme ci-Jointes, le 
lecteur entrera un fichier correspon- 
dant à l'objet erroné ci-après : 
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• RUN-MOD1 

a - Créer un objet 

a - Créer chaîne par chaîne 

Type d'objet: 

d - Solide 

a -S alsie clavier 

SAISIE DE CHAINES AU CLAVIER 

Nombre de segments ? 5 

Arêtes virtuelles en début de chaîne 

Leur nombre ? 

Point numéro 1 

XT = 7-0.303 

YT = ? 0.934 

ZT = ?-0.187 

Point numéro 2 

etc. 



FICHIER DES POINTS DE CET OBJET ER- 
RONE-: 

Ne le stockez pas I Sinon vous ac- 
tiverez automatiquement la routine de" 
réorientation des facettes et les erreurs 
volontairement mises disparaîtront. 

Utilisez alors : 
k - Voir pour produire une image avec 
élimination des parties cachées, se- 
lon la séquence : 

Désirez-vous un tracé du trièdre ? N 

Dessin facette après facette ? N 

<Return> 

Parties cachées éliminées ? O 

Avec arêtes virtuelles ? N 

Vous obtiendrez alors le dessin de 
la figure 2. Revenez au menu géné- 
ral par un <Return>. Puis faites : 
n-lnverser objet ou bloc 
a-lnverser objet 

<Return> pour retour au menu géné- 
ral. 

Refaites alors la séquence de vi- 
sualisation. Vous obtiendrez l'Image 
de la figure 4. 

Stockez alors votre objet en lui don- 
nant un nom quelconque, pqr exem- 
ple DODECA et refaites une visualisa- 
tion, Vous obtiendrez le dessin de la 
figure 6, 



Le succès de ce travail vous mon- 
tre que grâce à ce matériel vous pour- 
rez désormais entrer les facettes sans 
vous préoccuper de leur orientation. 
L'ordinateur prendra lui-même en 
charge ce travail. Dans la mesure où 
ceci représenterait pour l' utilisateur un 
effort Intellectuel assez complexe on 




Figure 6 - L'objet, après correction 
automatique. 

peut dire que cette section donne au 
logiciel un petit poil d'Intelligence 
artificielle. 

Mais ça n'est pas tout. Il reste un 
dernier exercice. Prenez cet objet DO- 
DECA que vous venez de créer et 
inversez-le, 'puis faites-en une Image 
à l'aide de VOIR. Vous obtiendrez 




Figure 7 ■ Vue de «l'i 



Par un effet de perspective ceci 
ressemble à un dodécaèdre vu sous 
un autre angle. Mais en fait II s'agit 
des faces qui dans l'Image précé- 
dente étaient «non vues». C'est 
comme si on apercevait l'Intérieur de 
l'objet, devenu transparent. 



Jean-Pierre PETIT 



OBJET DODECA, 

FACETTE APRES FACETTE, 
AVEC DES ERREURS D'ORIENTATION 



Objet DQDECA 




12 Chaînes 




Chai ne 


numéro 


1 


-0. 303 




. 934 


. 303 




0.934 


0. 187 




0.577 


-0 . 49 1 




. 356 


-0.794 




0.577 


-0.303 




0.934 


Chai ne 


numéro 


2 


0.794 




0.577 


. ?82 







0.607 




o 


. 1 87 




0.5/7 


. 303 




0.934 


Û.794 




. 577 


Chaine 


numéro 


3 


0. 794 




-0.577 


. 303 




-0. 934. 


0. 187 




-0.577 


. 607 







. 982 




■o 


0.794 




-0.577 


Chai ne 


numéro 


4 


-0. 303 




-0.934 


-0.794 




-0.577 


-0.491 




-0 . 356 


0. 1B7 




-0.577 


0. 303 




-0.934 


-0.303 




-0.934 


Chaine 


numéro 


5 


-0.982 







-0.794 




0.577 


-0.491 




. 356 


-0 . 49 1 




-0 . 356 


-0.794- 




-0.577 


-0.982 







Chai ne 


numéro 


6 


. 607 




o 


0. 187 




0. 577 


-0.491 




0.356 


-0.491 




0.356 


0.187 




0.577 


0.607 








-0 


. 187 





. 187 





.794 





.794 





. 1S7 


-o. 


. 188 


-0, 


, 187 


0, 


, 187 


0. 


.794 


0, 


.794 


0. 


187 


■0. 


. 188 


■o, 


187 


0. 


187 


0, 


794 


0. 


794 


û. 


187 



-0. 187 
Ù. 187 
0.794 
0.794 
. 1 87 

-0. 188 



-0. 187 
. 1 87 
O. 794 
0.794 
. 1 87 

-0. 188 



0.794 
0.794 
. 794 
0.794 
0.794 
0.794 



Chai ne 


numéro 


7 


-0.607 







-0. 1S7 




-0.577 


0.491 




-0.356 


0.491 




0.356 


-p. 187 




. 577 


-0.607 







Chaine 


numéro 


B 


. 982 







0.794 




0. 5 77 


. 49 1 




-0 . 356 


0.491 




0.356 


0.794 




0.577 


■0.982 







Chai ne 


numéro 


9 


. 303 




0.934 


0.794 




0.577 


0. 491 




. 356 


-0. 18/ 




0.577 


-0.303 




0.934 


0.303 




0.934 


Chai ne 


numéro 


10 


-0 . 794 




0.577 


-0.303 




0.934 


-0. 187 




. 577 


-0.607 







-0.982 




o 


-0 . 794 




0.577 


Chai ne 


numéro 


11 


-0.794 




-0.577 


-0.982 







-0. 607 







-0. 187 




-0 . 577 



-0 . 794 

Chaine 
. 303 
-0. 303 
-O. 137 
0.491 
0.794 
0.303 



■0 


.934 


■0. 


.934 


-0, 


,577 


■0. 


.356 


■o. 


,577 



-0.794 
-0.794 
-0.794 
-0 . 794 
-0.794 
-0.794 



0. 187 
0. 187 

-0.794 

~0. 794 

-0. 1B7 

0. 1B8 



0. 187 
-O. 187 

-0.794 

-0.794 

-0. 187 

0. 188 



0. 1B7 
-0. 187 
-0 . 794 
-0.794 
-0.187 

0. 188 



0. 187 
-0. 187 
-0.794 
-0.794 
-0 . 1 87 

0. 188 



0. 1B7 
-0. 187 
-0.794 
-0 . 794 

-0. 187 
. 1 88 



14005 C0 = 1 >KJ 

14010 OPENOUT'SAUVQBJ" >TH 

14020 PRINTI9,C01K),GX(K),GY(K),GZ<K),RE(K),L >PT 

14030 FOR 1 = TÛ L >LL 

14040 PRINTI8.N(I),A¥(I) >TH 

14050 FOR J = TO NU) >NN 

14060 PRINTt8,XT<IJ),ÏTU,J),ZT(I,J) >GE 

14065 GOSUB 15000 >LÏ 

14070 NEÏT J : NEXT I >NR 

14080 CLOSEOUT >FE 

14999 RETURN >PE 

15000 REH Calcul et trace liage >ZC 
15040 XL=XT(I,J)-XH )PP 
15050 ÏL=ÏTU,J1-ÏH >PU 
15060 ZL=ZTfl,J)-ZH >PV 
15090 ÏA=XLiïU+ÏL*YU+ZL*ZU >XX 
15100 ÏA=XL»IV+rL*ïï+ZLiZV >ÏT 
15110 ZA=XLfXW+YL«YY+ZL»Zy >XY 

15121 IF XA=0 AND ÏA=0 AND ZA=0 THEH ZA=0.001 )KJ 

15122 RO = SD.R(YA«YA+ZA*ZA) >VF 

15125 !F XA=Q THEN B=90:G0TD 15127 >AT 

15126 B^ATN[R0/IA):B=Bil80/PI >YD 

15127 IF XA<0 THEN B=BUflO >TK 
15130 IF YA=0 AND ZA=Q THEN A=9Q:GQTÛ 15160 >JB 
15140 IF ZA=0 AND YA >0 THEN A=-9Q:GQT0 15180 >KN 
15150 IF ZA=Q AND YA<0 THEN A=9Û:GDTQ 15180 >JC 
15160 A=-ATN(YA/ZA):A=AM9Û/PI >ÏZ 
15170 IF ZA<0 AND ÏA >0 THEN A=A-180 >AD 
15172 IF ZA (0 AND YA<0 THEN A=AH80 >AJ 
15174 IF ZA <Û AND YA =0 THEN A=180 >ZN 
15180 X=fl»SJH<A»Pi/180) : f =B»COS CA*P 1 /iBOJ >KF 
15240 IE=313->X»300/AN >PL 
15250 YE=200*ïi300/AN >PJ 
15255 IF J=0 THEN PLOT XEJE.CO ELSE DRAW XE.YE.CO.O >VB 
15999 REÏÏJRN >PF 
17000 HEM TRACE TRIEDRE >TQ 
17005 CO = 3 >LD 
17010 OPENIN'TRIEDRE» >RD 
17020 INPUTI9,C0<K).GX,GY.GZ,RE,L >CB 
17030 FOR 1 = TO L >LP 
17040 INPUTt9,N(!),AV<l) )TU 
17050 FDR J - TQ N(I) >NR 
17060 INPUTt9,XT(l,J),YT(I,J],ZT(l,J) >GL 
17070 GOSUB 15000 >LÏ 
17080 NEÏT J : NEXT l >HU 
17090 CLOSEIN >UH 

17999 RETURN >Pti 

18000 REH RECHARGER OBJET >UF 
18005 CO = 3 >L£ 
1BO10 OPENIN'SAUVOBJ" >RR 
18020 INPUTI8,C0(IO,GX(ia,GYiK),GZ(K),RE[K),L >PA 
18030 FOR 1 = TO L >Uj 
1B040 INPUTI8,NU),AY(I) >TÏ 
1B050 FDR J .= TÛ NU) >«T 
18060 INPUTt9,XT(l,JUT(l,JI,ZT(I,J> )GH 
18080 NEXT J : NEXT I )Nï 
1S090 CLOSEIN >UJ 
IBiOO ÙERA.'SAUVOBJ' >QY 



181 10 C = >AK 

18115 SOUND 1,100 >LÏ 

1B117 SOUND i.SOiGOSUB 65020: IF C=32 THEN CAU, fcAOO0:PR )QÏ 
INTI8:PRINT18 

16118 GOSUB 2000 )DF 

1B999 CHAIN"HQDf >ffll 

19000 PRINT"19000 B :'DESSIN FACETTE APRES FACETTE )NH 

19010 FOR 1=0 TQ L >LE 

19015 CLS >GB 

19020 FOR J=0 TO NU) >NZ 

19030 IF JMVU) THEN CD=1 ELSE C0=2 >CD 

19035 FOR 17=0 TO 200:NEIT TT >WL 

19040 GOSUB 15000 >LU 

19050 NEXT J >BK 
19060 LOCATE 1, 1:PRINT"FACETTE "; l+l:PRlNT'Pressez <Ret >FE 
urn>";GOSUB 65020 

19070 NEXT I >CA 

19075 CLS >GH 

19080 IF TRIEDRE=1 THEN GDSUB 14000.-GQSUB 17000:G0TQ tB )CJ 
000 

19999 RETURN >PK 

44000 REH Calcul de CG et de RE >UB 

44010 GX=0:GY=0:GZ=0:N=0:RE(K>=0 >BP 

44020 FDR 1=0 TÛ L: FOR J=0 TO N(l) >ZD 

44025 N=N+1 >TE 

44030 GI=GX*XT(I,J) . >PB 

44040 G?=GY*TTU,J) >PF 

44050 G2=G2+ZTfl.J) >PK 

44060 NEXT J;NEXT I >NG 

44070 GX(K)=GX/N )LZ 

44080 GY(K)=GY/N >LC 

44090 GZ(K)=GZ/N >LF 

44100 FÛ8 1=0 TO L:FOR 1=0 TO N!l) >ZP 
44110 B=SOH (<XT(],J)-GX(K))*(XT(I,J)-GX(K))+(YT(I,J)-G >HJ 
ï(K))t(ÏT(l,J)-GÏ(K)) + (ZT(l,J)-GZIK))HZT(l,J)-GZ(K))) 



44120 IF SEIKKR THEN REIK)=R 

44130 NEXT JiNEXT I 

44999 RETURN 

62000 REH CADRE 

G2010 CLS 

62015 BORDER 14 

62020 PLOT 0,0 

62030 DRAW 639,0,3 

82040 DRAW 639,399,3 

G2Û50 DSAU 0,399,3 

62060 DSAU 0,0,3 

G207O CO = 3 

62999 RETURN 

65000 REH Saisie caractère 

65005 PRINT 

65010 PRINT'Votre choix :' 

65020 C$=";CI=INKEYÏ:IF Ct=" THEN 65020 

65030 C=ASC(C«) 

65035 IF C=13 OR C= 32 THEN C=27;GOT0 65060 

65040 IF C>96 THEN C=C-96:G0T0 65060 

65050 IF C<96 THEN C=C-64 

6S060 SOUND 1,20,1 

65535 RETURN 



>UJ 

>NE 
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VOIR 



1 REM (Super)VQIR CPCS25 avec parties cachées eliiinees >BT 

, preiiere partie. 

'EINT"Pas d'accès direct a VOIR. )DA 
renvois sur H0D1. .. n :ùA:BUN"H0D 



2 IF FD = û THEN CLS 
..":PRINT:PRINT'Je vi 



1" 

5 CLS : LOCATE 17,12 ; PRINT'VOIR..." >DL 

7 IF L =-1 THEN PRINT:PR]NT"Pas d'objet résident, reto >UF 

ur sur H0D1 ' : ËL*="" :C=Û: CHAIN'HODl" 

10 GOSUB 44000 >PC 

20 BORDER 2G»RWD:CLS >PH 

25 IF ELï <> "" THEN LOCATE 25,2i:PR!NT"0b|et résident" >ZÛ 
:LQCATE 25,23:PRINT ELtrLQCATE 25,25:PKINT TYPE! 
30 LOCATE 13,10 : PEINT" Desirez-vous un trace du tri >VQ 
edre ?":G0SUB 65020:1F C=1S THEN TR1EDRE=1 ELSE TRIEDRE 
=0 

40 CLS:LOCATE 6, lOîPRtNT'Dessin facette après facette » >VT 
":L0CATE 7, 12;PBINT"( facettes virtuelles en bleu)"iGOSU 
B 65020:1F C=15 THEN FACETTE =1 ELSE FACETTE=0 
50 GOTO 7000 >2A 

1000 'FACETTE VUE 1 >XD 

1010 XGFACETTE=0:YGFACETTE=0:ZGFACETTE=0 >HL 

1020 FOR JJ=0 TO N(l)-l:'Caleul CG facette >QT 

1030 XGFACETTE=IGFACETTE+XT(I,JJ) >EJ 

1040 YGFACETTE=YGFACETTE+YT(I,JJ> >EN 

1050 2GFACETTE=ZGFACETTE+ZT ( ! , J J ) >ET 

1060 NEÏT JJ >dk 

1070 XGFACETTE=XGFACETTE/N(l) >AE 

1080 YGFACETTE=YGFACETTE/N(I) >AH 

1090 ZGFACETTE=ZGFACETTE/N(1) >AL 

1100 XABETEbXTfI,l)-XT(l,Q) >XY 

1110 YARETE1=YT(I,1)-YT(I,,0) >ÏC 

1120 ZARETE1=ZT(1,1)-ZT(I,0) . - >XG 

1130 XARETE2=XTiI,2)-XTU,l) >XE 

1140 ÏARETE2=ÏT(I,2)-ÏT(I,1) >XJ 

1150 ZARETE2=ZTII,2)-ZT(I,1) >XN 

1160 NX=-(ARETE2iZARETEUÏARETElïZARETE2 >MA 

1170 NY=-ZARETE2)XARETE1+ZARETE1«IARETE2 >HA 

11B0 NZ=-XARETE2iïARETEl+XAHETEUi'ARETE2 >MA 

1190 PSCALAIBE-IXGFACETTE-XHHNXHYGFACETTE-YMUNYMZGF >ZN 
ACETTE-Zfl)iNZ 
1200 IF PSCALAIRE>=0 THEN ELIHFACETTE=1 >JF 

1999 RETURN >Hfi 

2000 BEH Objet delà présent en ■eicire ;GY 
2005 VIRTUELLES^ > NT 
2010 CLS:LOCATE B,12:PR!NT"Parties cachées éliminées ?» >BR 
:GOSUB 65020: IF C015 THEN 2999 

2015 CLS:LOCATE 9, i2:PBlHT"Bvec arêtes virtuelles ?":G0 >JU 

SUB 65020: IF C=15 THEN VI8TUELLES=1 

2020 INTERACTIONS jpn 

2030 GOSUB 62000 >CK 

2040 IF TYPE(K)=0 THEN PR1NT"TYPE DE L'OBJET":PRINT:PRI )YW 

NT"l-Fil-de-fer":PRINT"2-Graffiti':PRINr3-Coaue":PRINT 

'4-Sûlide":PRlNT:G0SUB 6500Û:TYPE=C:GQSUB 62000 

2050 IF TYPËtK)=l GR TYPE(K)=2 THEN GOTO 2999 )LA 

2060 IF TYPE(K)=3 THEN CLS:PRINT'Un instant, ie classe >GQ 



■es facettes...": GOSUB 3400Û:G0SUB 62000:GOSUB 36007:G 

OTO 2150 

2070 FOfi i = TO L >FC 

2080 ELI MFACETTE=0: GOSUB 1000: IF ELIHFACETTE=1 THEN 214 >BH 



2090 FOR J=0 TO NU) >HL 

2100 HE=0 >CF 

2105 IF J>A1MI) THEN C0=1 >TV 

2107 IF VIRTUELLES=1 AND J<=AV([) THEN C0=2 >LA 

2108 IF VIRTUELLES=0 AND J<=AVÏ1) THEN C0=0 >LY 
2110 GOSUB 15000 >CG 
2120 NEXT J >ug 
2140 NEÏT I >tfc 
2150 SOUND l,50:GOSUB 65O20:IF Ct=" ' THEN CALL fcAOOO >UfJ 
2999 RETUSN >HC 
7000 REH Représenter un objet >YT 
7010 AN = 20 >kh 
7040 XM = GXtK) t RE(K1 > 3.5 >TQ 
7050 YH = GY(K) ■* RE(K) i 2.5 >n 
7060 ZH • GZiK) + RE(K) i 1.5 )T¥ 
7080 XG = GI(K):YG=GY(K):ZG=G2<K> >BD 
7090 CX = XG - XH : CY = YG - YM : CZ = ZG - ZH >EÏ 
7100 DD - SQR (CHCX + CY»CY ) )¥F 
7110 IF DD = AND CZ > THEN TE = : Kl = PI / 2 : G >U« 
OTO 7210 

7120 IF DD = AND CZ < THEN, TE = : Kl =-PI / 2 : G >VJ 
OTO 7210 

7130 Kl = ATN (CZ/DD) )NJ 

7140 IF CX = AND CY > THEN TE = 1.57 : GOTO 7210 >LQ 

7150 IF CX = AND CY < THEN TE =-1.57 : GOTO 7210 >MU 

7160 TE = ATN (CY/CXÎ >NH 

7170 IF CX < AND CY > THEN TE = PI * TE >CK 

7180 IF CX < AND CY < THEN TE = PI + TE >CJ 

7190 IF CX < AND CY = THEN TE = PI >ZN 

7200 IF CX = AND CY < THEN TE = - PI/2 >CT 

7220 REH >AC 

7230 CT * COS (TE) : ST = SIN (TE1 >XC 

7240 CK = COS (Kl) : SK = SIN (Kl) >XY 

7250 XU = CK»CT : YU = CK«ST ; ZU=SK >AH 

7260 XV = - ST : YV '- CT : ZV = >UH 

7270 XU = - SKtCT : YU = - SK«ST : ZU = CK >CC 

7280 GOSUB 62000 >EB 

7285 IF FACETTEE THEN GOSUB 19000 >BB 
7290 IF TRIEDHE-t THEN GOSUB 14000 : GOSUB 17000 : GOT >CX 
18000 

12000 RErl Objet déjà présent en leioire >HD 

12010 C0=1 >JK 

12020 FOR I = TO L : FOR J = TO MCI) >AK 

12025 IF J<=AV(l) THEN C0=2 ELSE CD=1 >CA 

12030 GOSUB 15000 >LH 

12040 NEXT J:NEXT 1 >NZ 

12050 C=0 )AD 

12060 SOUND 1,50:GÛSUB 65020:1F C»=" " THEN CALL iAOOO >YL 

12070 GOSUB 2000 >CG 

13000 SOUND 1,200 : CHAIN"H0D1" >XB 

13010 CHAIWH0D1" )LH 
14000 REH SAUVEGARDE ET DESSIN DE L' OBJET RESIDENT >CU 



I M0D2 

i 

i 



1 HEM lsuper)H0D2 CPCS25 >UF 

2 IF FD=1 THEN 201 )LH 
5 SOUND 1,20: CLS:PR1NT"PAS D'ACCES DIRECT A H0D2\PRIN >ED 
T:PRINTMe vous renvois sur H0D1. ..":RUN B HQD1 

10 BORDER 26»RKD:CLS : REH MENU PRINCIPAL ;KR 

15 PRINT'HENU PfiiHCiPAL":Pfl[MT >BH 

20 PRINT'a-Creer un objet" >AE 

30 PfiiNT'b-Coipieter atalet ou bloc" ;NZ 

40 PRlNT'c-StocKer un objet" >ÇÏ 

50 PRINT'd-Charger un objet" >bH 

m PRINT'e-Gestion de diqcs d'objets 11 >ÙL 

70 PRINT't-Gestion du catalogue" >JH 

80 PRINT'g-rlanipuier objet ou bloc" JNrl 

SO PRlNT"h-Fusians alverses" fEX 

100 PRINPi-Eiailner objet" >CA 

110 PfiiNT" j-Ficbier objets standards" >RH 

120 PRINT"k-volr" >PR 

130 PR1NT"! -représenter un DDjet" .>LZ 

140 PRlNT"i-P!an trois vues" >DV 

150 PRiNrVInwerser objet ou bloc" >NQ 

160 PRIHT n o-Changer type oblet ou bloc" >TG 

170 PRINT'p-' >0B 

100 PRINT"q-Qultter" >UK 
190 IF BLIO" THEN LOCATE 22,17:PRlNT"Bloc resident":L JGH 
OCATE 22,19:PRINT fil» 

192 LOCATE 25,2 : PRINT"SUPERAHSTRAD-3D" >JF 

193 LOCATE 29,4 :PRINT CHR*U64>;" J.P.PETIT 1 ' >NB 

195 IF ELI Q " THEN LOCATE 22,21;PR(NT"0biet résident )KC 
■:L0CATE 22,23;PR1NT EL» 

196 'LOCATE 32, 10:PRINT"Drive ";Dfi'ltfE* )TG 

197 IF LO-i THEN LOCATE 31,23:PRINT LHÏ" ch.":UKATE >UG 
22,25:PRINT TÏPE1 

190 LOCATE 1,22 >ïA 

200 GOSUB 65000 >WH 

201 ÙERA,"*.BAK":CLS >P0 
210 IF C^17 THEN END >NL 
220 IF C<1 OR C>17 THEN 10 >RL 
222 IF C=ll THEN CHAIN"1/0IR" >UJ 
224 IF C=14 THE» GOSUB 1000:GOTO )0 >BD 
230 MODE 1: ON C GOSUB 64000,64000,8000,5000,54000,6*0 >CG 
00,11000,12000,64000,64000 

240 ÙERA,"«,BAK" >LF 

999 GOTO 10 >UE 

1000 CLS:PBINT"INVERSER":PRlNT:P8INT"a-Ûbjet":PRiNT"h-B >FN 
loc":G0SUB 65000 

1002 IF C = 2 THEN FB = 1 :G0SUB 31000 >AW 

1004 IF C = 1 THEN GOSUB 30OOO >DH 

1010 IF FB=0 THEN 1030 )NÏ 

1020 FQR K=0 TO E:GDSUB 5010 >VY 
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1030 FOR 1*0 TO L >l 

1040 H=-l >I 
1045 IF AV(l)OQ THEN FUGU1RTUEL=1 ELSE FLAGVIRTUEl^O: >l 
GOTO 1080 

1050 FOR J=AVII) TO STEP-1 >1 

1060 N=N*1 >l 

1065 XElN)=lCTU..Il:ï£(Ni=YT([,J);XEB[S(NÏ=ZTU.J> >l 

1070 NEÏT J >' 

1080 FOR J=NU)-FLAGVIRTUEL TO AVCI» STEP-1 >i 

1090 N=N+1 >I 

1100 XE(N)=IT(l,J):ÏE(N)=ÏT(l,J):IEBiSIN)=2T(l,J) >' 

1110 NEÏT J >t 

1120 FOR J=0 TO NU) >l 

1130 XTU,J)=XElJ)iYT([,JME(J):ZT(I,J)=IEBIS[J) >* 

1140 NEÏT J > 

1150 NEXT l >' 

1170 IF FB^O THEN 1999 > 

1180 GOSUB 32000 > 

1190 NEXT K > 

1200 GOSUB 33000 > 

1999 RETURN > 

5000 REM Charger objet > 

5001 CLS > 
5005 PRINT"Charger objet (disquette objet !...)": PE I NT > 

5007 INPUT"Noi de l'objet ";EL*IK) > 

5008 ELt=EL*(K) > 
5010 PRlNFJe charge ";EL*IK);" ";TYPE$<TÏPE(K>> > 
5017 ON ERRÛR GOTO 23000 > 
5020 IF DRIVE2=l THEN ÙB > 
5025 DPEN1N ELt(K) > 
5030 INPUT t9,TYPE(K),GX(K),GYfK),GZ(K),RE(K>,L > 
5040 FOR l = TO L > 
5050 INPUT 19,N(1),AV(I) > 
5060 FOR J = TO Nil) > 
5070 INPUT (9, XTII.J), YTU, Jl.ZTll.J) > 
5080 NEÏT J:NEXT l > 
5090 CL0SE1H > 
5095 TYPE=TYPE(K) :TYPE*=TYPE*(TYPE(K) ) J 
5999 RETURN ) 
30000 REH objet en lËioire ? ) 
30002 IF L (> -1 AND EL* ="" THEN PRINT'Obiet sans n ) 
oi présent en ■eioire";PRINT:PRINT"On garde ?":GOSUB 65 
020:1F C - 15 THEN 30999 

30010 IF a* <> *" THEN PRINT'Qbjet résident ";EL* S 

:PRINT:PRINT"On garde ? , :LC=15:G0S0B 65020 

30020 IF EL* O " AND C = 15 THEN 30999 > 

30040 GOSUB 5005 '. 

30999 RETURN ) 

65000 REH Saisie caractère ) 

65005 PRINT i 

65010 PRINT"ïotre chou :":PRINT I 

65020 C*="":C*=INKEY*:IF C*="" THEN 65020 ï 

65030 C=ASC(C*> ! 

65035 IF C*13 OR C= 32 THEN C=27:GDTQ 65060 ! 

65040 IF D96 THEN C=C-96:G0TQ 65060 \ 

65050 IF C<96 THEN C=C-64 I 

65060 SOUND 1,20,1 : 

65535 RETURN ! 



9010 CLSiPRINFCREER OU COMPLETEE UN OBJET" :PE1HT:PKIWT >'BN 

*a-Chalne par chaîne" 

9020 PRINT"b-0b1et de révolution" >KÏ 

9040 PBINT'c-Travailler sur oblet standard" >AB 
9050 PRINT"d-Prisie" >TZ 

9060 PRINT"e-CercIe" >TP 

9070 PRINT"f-Arc de cercle" >AN 

9090 G05UB 65000 >EF 

9095 CI=C >DK 

9100 IF C>6 DR C =-51 THEH 9999 >VT 

9102 IF COI THEN 9000 >NR 

9104 CREATIGN=C >LA 

9106 IF TYPE(K)OÛ THEN TYPE=TYPE(K) :PRINT:PRlNT"L'ab)e )JP 
t est de type ";TYPE*(TYPE(K)):FDR TT=0 TÛ 1000:NEXT TT 
:GÛTO 9110 

9108 CLS:PRIHT"Definir le type de l'obiet:":PRlNT:PRlNT )ED 
"a*Fil-de-fer":PSIHT*b-Grafflti":PRI«T"c-Coque':PfilNT , d 
-SolldeVGOSUB 65000 : TYPE ( K > =C : T YPE*^TYPE» ( TYPE ( K tl : TÏP 
E=TYPE(K) 

9109 IF CREATION)! AND CREAT10N<7 AND TYPEOl AND TYPE< >CU 
>2 THEN CHAIN'HODIBIS 

9110 IF CREAT! UNO THEN 9500 >UP 
9120 IF TYPE=1 THEN 95Q0 >RU 
9500 ON CREATION GOSUB 26000,34000,11000,54000,32000,33 >AH 
000 

9999 RETURN >HK 

10000 'EXAHINER OBJET >CG 
10999 RETURN >PA 
26000 'CREER CHAINES AU CLAVIER >DD 
26010 GOSUB 60000 >LQ 
26017 IF CE =■ 2 THEN GÛSUB 14000:GOTO 26999 >HE 
26020 L=L*1: IF L>12 THEN CLS:PRlNT"Trop de chaînes...": >Ut> 
SOUND 1,20:F0R TT=0 TQ 1000:NEXT TT:GDTQ 26999 

26025 CLS: PBINT'SAISIE CHAINES AU CLAVIER": PRINT >ÏR 
26030 INPUT'Noibre de segients ";NtD >HU 

26035 PRlNT:PRINT"Aretes virtuelles en début de chaîne. >AP 
':PRINT:lNPUT"Leur noibre ";AV$:PR1NT; IF AV*="" THEN AV 
(L)=0 ELSE AV(L)=VAL(AVt) 

26040 FOR J=U TD N1LI ;NC 

26050 PRINTToint nmero "iJ+1 >DE 

26060 INPUT W IT=';XT(L,J1 )UK 

26070 INPUT"YT=";ÏT(L,J) >UN 

26080 HiPUT , ZT="ïîTCL.J) >UR 

26090 NEXT J )CB 

26100 PRINT" Une erreur ?":LC=28:G0SUB 650 )AZ 

20:1F C = 15 THEH 26025 

26130 PRINT" One autre chaîne ?":LC=28:G0SUB 65 >FC 
020: IF C = 15 THEN 26010 

26999 RETURN )PH 

29000 ' INVERSER FACETTE >K 

29010 N=-l >HE 

29015 IF DHIVE2=1 THEN ùfl ELSE ÙA >AU 

29020 FLAGVIRTUEL=AV< Il >UD 

29025 IF FLAGWJBTUEL=0 THEN 29070 >BD 

29030 FDR J=AV(!) TO STEP-1 >WD 

29040 N=*ttl >TE 

29050 XE(N)=ÏT(l,Ji:YE(N)=YTtI,J) : XEBISlN);ZT(l,J) >XH 
29060 NEXT J >CB 



m 



>NZ 



>EN 



>TE 



29070 FOR J=Nfl)-FLAGV!RTUEL TO AV(I) STEP-1 
29080 N=N+1 

29090 XE(N)=XTU,JkYE(NhYT(],J):XEBlS<N)=ZTU,J) 
29100 NEÏT J 
29110 FOR J=0 TO NID 

29120 XT(1,,T)=XE(J1:YT(I,J)=YE(J):ZT(I,J)=XEB1SU) 
29130 NEXT J 
29999 RETURN 

38000 'VERIFIER FACETTES 
3B010 FOR 1=0 TO L- 
3B020 XARETE1=XT(I,1)-XT(I,0> 
38030 YARETE1=YT(1,U-YT(I,01 
38040 ZARETE1=ZT(I,1)-ZTII.01 
38050 XARETE2=XTU,2)-XTU,1) 
38060 YARETE2=YTU.2)-YT(l,i) 
38070 ZARETE2=ZT(1,2)-ZTU,1> 
38080 NX=-YARETE2«ZARETEWARETEUZARETE2 
38090 NY=-ZARETE2»XARETE1+ZAHETEUXARETE2 >NZ 

38100 NZ=-XARETE2>YARETEHXARETEUYAR£TE2 >NP 

38110 PSCALAIRE=(XT(l,l)-GX[K)HNX+{YT(l,ll-GY(K))*nyt( )ZD 
ZTlI.ll-GZIKJUNZ 

38120 IF PSCALAIRE<0 THEN GOSUB 29000 
38130 NEXT I 
38999 RETURN 
44000 'CALCUL CG ET RE 
44010 GX=Q:GY=O;GZ=0:N=O:HE(K)=Û 
44020 FOR 1=0 TÛ L: FDR J=0 TO NU) 
44025 N=N+1 

44030 GI=GX*IT<l,J> >PB 

44040 GY=GYtYT£I,J) >PF 

44050 GZ=GZ*ZT(1,J) >PK 

44060 NEXT J:NEXT I >NG 

44070 GX(K)=GÏ/N >LZ 

44080 GY(fO=GY/N >LC 

44090 GZ(K)=GZ/N >LF 

44100 FOR 1=0 TO L:F0R J=0 TO N(l) >ZP 

44110 R=SQH (iXT(l,J)-GX(K)H(XTUJl-GX(Kl) + tYT(l,J)-G >HJ 
Y(K)KlYT(l,J)-GY(K))t(ZT(I,il-GZ{f()l*(ZTU,J)-GZ(K)ll 
44120 IF REIKXR THEN RE(K)=R >WJ 

44130 NEXT J:NEXT I >NE 

44999 RETURN >PH 

60000 'TYPE DE SAISIE )DB 

60005 SE=Q >LB 

60010 CLS : PRINT"DEFIN1?I0N TYPE DE SAISIE":PRINT >YY 
60020 PRlNT'a-Saisie clavier (par défaut)" >YL 

60030 PRINT'b-Salsle écran (Contour polygonal plan)":GO >JN 
SUB 65Û00;CE=C 

60040 IF CE<>2 THEN CE=1:GOTO 60999 >BY 

60999 RETURN >PF 

65000 'SAISIE DE CARACTERE >DG 

65010 PRINT:PRINT"Votre choix :" >FQ 

65020 C*="":Ct=iNKEYt:IF C*=" THEN 65020 >FL 

65030 C=ASC(Ct) >XF 

65035 !F C=13 OR C= 32 THEN C=27:G0T0 65060 >GH 
65040 IF 096 THEN C=C-96:G0T0 65060 )CH 

65050 IF C<96 THEN C<-64 >fiU 

65060 SOUND 1,20,5 >LZ 

65535 RETURN >NG 
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1 «KM isuoenHODl leçon CPCS25 

2 IF FDM THEN 230 
J FD-1: L = - 1 

4 DM XT(35.12),YT(35,12),ZTf35,12>,NI35].AV(35i,ELï<19 

i.TYPE(l9>.GX(19i.GYli9),GZU9),RE(19),XEI12>,YEU2),XE 

BISU2>.YEBIS(12),5T*U9) 

b TYPEIU) = *f il -de-fer" :TïPE»(2)="eraf f iti*;TÏPEt(3) = "c 

oque";TÏPEH4)='aûlldÈ" 

10 CLS 

16 CHINT-MENU PRINCIPAL" :PRINT 

20 PRih Ta -Créer un onjet" 

30 PRlNPb-Coipleter objet ou bloc" 

40 PRlNT'c-Stocker un obiet' 

50 PRINT'd-Charger un objet" 

60 PftINT'e-Gestion oe blocs a'onjets" 

70 PRINT't-Gestion du cataioflue" 

ÛU ffiiNT'g Manipuler onjet ou diqc" 

90 PRlNT'n-Fusions diverses" 

1UU PRlNT"i-E<aiiner obiet" 

110 PRINT\Hichier objets standards" 

120 PRLNT"k-ïoir' 

130 PRINT"I-Representer un obiet" 

140 ffilNPi-rlan trois vues" 

150 PRINT"n-lnverser objet ou bioc" 

lbû PRINT"o-Chaneer type objet ou bloc" 

170 PRINT"p- s 

lriû P&INrq-ijuitter" 

130 IF BLIO"" THEN LOCATE 22,17:PRi«ï n Bloc résident" :L 

UCATE 22.19:PRINT BU 

192 LOCATE 25.2 : PRINT"SUPERAKSTRAD-3D h 

193 LOCATE 29,4 :PRINT CH8IU64); " J. P. PETIT" 

195 IF EL* <> "" THEN LOCATE 22,2l:FRINT"Ùbiet résident 

50 



"iLÛCATE 22,23:PRINT ELI 

196 'LOCATE 32, 10:PRlNT"[>rive r ;DBIV£t >TG 

197 IF LO-1 THEN LOCATE 31,23:PRINT L+l;" ch.':LGCATE >HG 
22,2S:PRINT TYPE* 

19Û LOCATE 3.22 >1C 

200 GOSUB 65000 >UH 

205 IF C-H THEN CHAIN"VOIR >YB 

210 IF C=I7 THEN:END >NT 

217 IF C=i4 THEH CHAIN "M0D2 >l(N 

220 IF C<1 08 Cî 17. THEN 10 >RL 

230 ON C GOSUB 9000,13000.8000.5000.21000,22000.64000,6 >PU 
4000, 10000, 20000 

999 ùERA,"i.bak":GOTÛ 10 >UK 

500C 'CHARGER OBJET >XH 

5005 CLS:PRINT"Charjer objet (disquette objet !...J":PR >TU 
INT 

5007 INPUT"Noi de l'objet ";EL*IK):1F LEN (EU(K))>8 TH >FF 
EN PRiNT"8 caractères seu lèsent, presser <Return>":GOSUB 
65020: GOTO 5000 

5010 £Lt=EL*tK):PRlNT"Je charge ';EL»(K) >LZ 

5020 OPENIN ELÏ(K):ELt=EL*(K) >K 

5030 INPUT I9,TYPE!K),GX(K),GY(K>,GZIK),R£IK),L >RJ 

5040 FOR I = Tû L >FC 

5050 INPUT I9,N(I),AV(I) >TD 

5060 Fûfi J = TQ Nil) >HC 

5070 INPUT I9,XTU,J),YTU,J),ZTU,J) >FE 

5080 NEXT J:NEXT I >HV 

5090 CLOSEIN >HE 

5095 TYPE*=TÏPE*(TÏPE(K>):TÏPE=TÏPE(K) >KC 

5999 RETURN >HF 

8000 'STOCKER UBJET >ÏA 

8001 CLS:PRINT"STQCKER UN OBJET (disquette objet !..)": >YY 
PRJKT: IF L=-l THEN SOUND l,30,20:PRlNT"Pas d'obiet resi 
dent !":F0R TT=0 Tû 200: NEXT:: GOTO 8999 

8002 INPUT"Noi de l'objet ";EL»{K):IF LEN (EL*(K)t>6 TH >VN 
EN PRINT:PRINT"8 caractères seulement, pressez <return>" 
:G0SUB 65020: GOTO 8000 

8005 ' )YF 

8007 ELt=EL*(K) >YB 

B008 CLS:PRINT"Type de I 'obiet":PRiNT:PRINT"a-Fil-de-fe >AK 
r l, :PRlNT"b-Graffiti"iPRINT ïï c-Coque":PRINT"d-Solide , :GOS 
UB 65000;TYPE<K)=C:TYPE*=TYPE*(C> 

8010 PRINT"Je stocke l'objet ";EL$(K1;" "îTÏPE*(TÏPE(K> >HV 
) 

8020 GOSUB 44000 >DE 

B022 IF TYP£(K)=4 THEN GOSUB 38000 >A« 

8025 OPENOUT EU(K) >NB 

8030 PRINT I9,TYPE(K),GX<I0,GY<K),GZ<K),REIK>,L >RJ 

8040 FOR I = TÛ L >FF 

B050 PRINT I9,N(I),AV(I) >TD 

8060 FOR J = TO NID >MF 

8070 PRINT I9,XT(I.J),YTU,J),ZT(I,J) >FE 

8080 NEIT J : NEIT I >NB 

8090 CLOSEOUT >ZH 

8100 EL*=ELÏIK) >XF 

8999 RETURN >HJ 

9000 'CREES UN OBJET >YB 
900S L=-l:K=K+ltEL*tK)=":EU="":TÏPEJa»« >HZ 
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1 - Combien de trous y a-t-il sur 
un billard ? 


6 


2 -Quand vous faites tomber la 
boule blanche dans un trou, où 




pouvez -vous la mettre sur la table 
pour continuer le feu ? 


A l'intérieur du "D" 


3 - Au début du jeu, combien y a- 
t-il de boules sur la table ? 


16 


4 - Que se passe-t-il si vous faites 
tomber dans les trous la bille noire 
et la bille blanche en même temps ? 


Vous perdez 


5 - Donnez le nom du champion 
européen actuel de billard. 


Maltese Joe Barber 




Gagne 4 logiciels + 1 T-shirt + 3 af- 
fiches : Paul NICOLAS - 91390 
MORSANG-SUR-ORGE. 

Gagne 1 logiciel + 1 T-shirt + 3 af- 
fiches : Stéphane BONDU -44700 
ORVAULT. 

Gagne liogiciel + 1 T-shirt + 3 affi- 
ches : Sébastien VAN-DEN-BROU- 

CKE — 35160 St Jacques Aéroport. 



Pendant que nous &._ 

tique, un petit conseil : 



drait rien de plus que ce qui est impri- 



née de destruction et de carnage comme 

tout le monde les aime. Notre aVÎS : 

Au menu du premier niveau : hommes- 



postes au sol, détritus divers voletants 
et pour finir quelques tourelles éq 
de canons agressifs. 
A la fin de < 

ter le premier demi-dieu. N< 

«bouse». Elle est munie 

vulnérable. C'est évi- 

t sur ce point qu'il faudra 



ation du fabuleux jeu d' arcade est bien sûr en-dessous de l'original mais 
tout de même, on peut franchement s'éclater en jouant à deux au milieu d'anima- 
tions et de graphismes réussis. Seul le mode de déplacement peut surprendre 
mais on finit par s'y faire et même par trouver ce système très pratique. 



iQOOG -i*/zo 



tionner en bas à gauche et de pilor 

la position. 

Même lorsque les premières explosions 
apparaîtront, continuez à tirer :voi 

re des points. 

e niveau offi 

mis avec quelques 
veaux : les serpents géants qui sor- 

u pour vous fai 
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3d pool 



^ Sivousappréciezlesjeuxdecon- 
tacts, vous ne risquez pas d'être 
déçus avec 3D Pool. Bien que ce sport 
ne se déroule pas en plein air et que 
les équipes respectives soient unique- 
ment constituées d'une seule per- 
sonne, les rebondissements sont 
nombreux. Pas la peine de faire du- 
rer le suspense, il ne s'agit que d'un 
jeu de billard. Enfin lorsque je dis 
«que d'un» je n'ai pas tout à fait rai- 
son car 3D Pool est original à plu- 
sieurs titres : il s'agit d'un snooker 
représenté en 3 dimensions. Jusque- 
là pas de quoi emboutir une XM mais 
il faut ajouter que la table peut tour- 
ner sur elle-même sous plusieurs 
angles et qu'il n'y pas de queuere- 
présentée à l'écran ! Eh oui, mon 
pauvre monsieur tout se perd. 
Pour les ceusses qui préfèrent regar- 
der Dorothée au lieu de s'amuser 
sainement dans les salles de billards 
enfumées et fréquentées par la haute 
société, voici quelques précisions 
concernant l'art de rentrer les bou- 
les dans les trous : le billard anglais 
se pratique sur une surface de jeu 
percée de 6 trous. Les boules sont au 
nombre de 15 (7 rouges, 7 jaunes et 
une noire) plus une boule blanche qui 
sera utilisée tout au long du jeu. Par 
manque de couleurs disponibles 
(mode 1 du CPC), la couleur jaune 
est remplacée par du rouge rayé de 
noir. Le gagnant du tirage au sort peut 
commencer par «briser» le triangle 
des 15 autres boules afin d'en entrer 
une dans un des trous. La première 
boule entrée détermine la couleur at- 
tribuée au premier joueur. La partie 
se déroule alternativement entre les 
deux protagonistes au fur et à me- 
sure des fautes et des «séries». La fin 
du jeu est proche lorsqu'il ne reste 
plus que la boule noire à entrer. 
Bien entendu, 3D Pool applique tou- 
tes les règles de ce jeu, il n'est donc 
pas question de tricher. Ah bon, parce 
que l'ordinateur sait jouer au billard. 
Un peu mon neveu qu'il sait jouer le 
bougre !. 




La manipulation du jeu se fait très 
simplement : deux touches font pi- 
voter la table suivant un plan hori- 
zontal ayant pour centre la boule 
blanche et deux autres élèvent ou 
abaissent l'angle entre le plan de la 
table et le point de vue au joueur. 
Ensuite il faut sélectionner l'effet 
désiré puis la force du coup. Un pe- 
tit double click et la boule blanche 
est propulsée vers sa destination. 
Bien que tout cela semble très sim- 
ple, il n'est pas évident que lors de 
vos débuts le résultat soit celui es- 
compté. C'est pourquoi il est conseillé 
de surveiller le mode démo et de 
sélectionner quelques bons coups 
grâce à un éditeur présent dans les 
options. 

Edité par .-Firebird 

Prix indicatif :Non communiqué 



Si le billard vous passionne, vous 
apprécierez certainement 3D Pool 
et ses nombreuses options (no- 
tamment le mode tournoi où vous 
affronterez des joueurs informa- 
tiques). Pour les autres, le plaisir 
du jeu peut être gâché par un 
graphisme approximatif et des 
couleurs tristounettes. 

OOOO dltto 




54 




SOLUTION 



LE MANOIR DE MORTEVIELLE 





La première aventure publiée par 
Lankhor semble avoir déchaîné 
les passions. Vous avez été nombreux 
à nous demander la solution de ce jeu. 
Aussi, voici une solution directe pour 
connaître enfin le fin mot de l'histoire ! 

V ALLER DANS LE COULOIR 
\ -ALLER DANS LA CHAMBRE 

DE BOB (2ème porte à droite 
en partant de la fenêtre) 

V - OUVRIR LA MALLETTE 

AU-DESSUS DE L'ARMOIRE 

- FOUILLER LA MALLETTE 

- PRENDRE LE POIGNARD 
-SORTIR 

- ALLER DANS LA CHAMBRE DE 
GUY ET D'EVA (Ire à gauche) 



*l - OUVRIR LA MALLETTE 

SUR L'ARMOIRE 
\ - FOUILLER LA MALLETTE 
, - PRENDRE LA BAGUE 

SURMONTEE D'UNE CROIX 
V SORTIR 
\- ALLER A LA CAVE 
■■■ -METTRE LE POIGNARD 

DANS LA FENTE NOIRE 

JUSTE AU-DESSUS DU SOLEIL 

DU PIUER AU MILIEU 

- EMPRUNTER LE PASSAGE 
SECRET 

•REPONDRE AUX 10 

QUESTIONS : 

1 - NATURELLEMENT 

2-AUTRE 

3 - RECHERCHES HISTORIQUES 

4 -SALLE A MANGER 

5 -UN PARCHEMIN 

6-3 

7-10 

8-MURIELLE 

9-GUY 

10- LEO 

- PRENDRE LA BAGUE EN OR 
AVEC LA CROIX 

- METTRE LA BAGUE SUR LE 
TROU EN HAUT DE LA BOULE 

- TOURNER LA BAGUE 

- ENTRER DANS LA CRYPTE 

- FOUILLER LA MAIN QUI TIENT 
LA LANCE 

- PRENDRE L'OBJET EN BOIS 
-SORTIR 

- REPRENDRE LA BAGUE 
SUR LA BOULE 

-SORTIR 

- ALLER DANS LE GRENIER 
(à droite de la fenêtre, dans le 
couloir) 

- OUVRIR LE TIROIR DU HAUT 
DE LA COMMODE 

- FOUILLER LE TIROIR 

- PRENDRE LA BAGUETTE 

- METTRE L'OBJET EN BOIS EN 1 

- METTRE LA BAGUETTE EN 2 

- TOURNER SUR LA BAGUETTE 
-LIRE LE LIVRE... 

Et vous saurez tousles détails de l'his- 
toire ! 
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Le premier qui me parle de «Super Scrabble» je lui met 
deux baffes. Vous ne croyez pas que j'ai une tète à me cas- 
ser la tête pour trouver des mots de 7 lettres à caser sur un 
plateau de jeu. Ce que je veux, moi c'est de l'action. Ca tombe 
bien parce que Super Scramble est une simulation de casca- 
des à moto. Je n'ose pas dire qu'il s'agit de moto cross ni de 
trial mais plutôt d'un subtil mélange de ces deux styles de 
conduite. Pour une fois je prends des gants et j'enfourche ma 
machine. Bon d'accord en général, je ne suis pas particulière- 
ment fainéant mais là, ils m'ont collé 15 parcours à la suite ! 
J'en vois qui croient que ça va être une partie de plaisir et 
qu'il ne s'agit en fait que de foncer tête baissée et de ne se 
relever que pourle franchissement des obstacles. Eh bien ceux- 
là ils ont tout faux, car Super Scramble, malgré son nom est 
fait tout de subtilité et de stratégie. D'abord il y a l'écran de 
jeu et le tableau de bord composé de deux zolis cadrans l'un 
étant le compteur de vitesse et l'autre le compte-tours. Entre 
ces deux cadrans il y a un indicateur des vitesses enclenchées. 
On peut alors compter sans peine 3 vitesses plus le point mort. 
Je vois maintenant que ceux qui rigolaient tout à l'heure ont 
des tronches de Michel Sardou en deuil. 
Eh oui, il va falloir passer des vitesses au bon moment selon 
le type de terrain ou d'obstacle. Dans la première section (celle 
dont ils l'appellent dans le jeu la section facile) il y a 3 par- 
cours différents qui doivent être effectués en un temps mini- 
mum (de l'ordre de 2 minutes). 





Let's go ! Après un petit compte à rebours, c'est le rugisse- 
ment (oui, enfin... presque) du moteur qui emplit le haut-par- 
leur du CPC. Après avoir acquis un nombre raisonnable de 
tours/minute, il est possible d'enclencher la première vitesse 
sans caler. C'est là que commencent les difficultés de mani- 
pulation car votre unique manette est utilisée comme poignée 
des gaz, pédale de changement de vitesse, frein, guidon et de 
plus elle doit corriger l'assiette de votre moto «en vol» tout en 
effectuant des «wheelings». Dans le premier parcours vous 



rencontrerez parexemple des tremplins que vous pourrez passer 
en troisième sans problème. Mais attention à l'atterrissage qui 
doit s'effectuer presque à l'horizontale car sinon vous «écra- 
sez» la roue arrière ou avant. Les pentes elles, se prennent en 
deuxième ou en première pour les plus costauds (60 degrés). 
Certaines parties du terrain sont limitées en vitesse lorsque 
vous dépassez ces limites vous êtes sanctionné par des secon- 
des de pénalité. Et ce n'est pas toujours facile de rouler à vi- 
tesse réduite lorsque l'on jette un coup d'œil sur le chrono- 
mètre du bas de l'écran. Mais le plus difficile à mon avis est le 
passage des obstacles qui vous obligent à soulever alternati- 
vement la roue avant et la roue arrière tout en roulant suffi- 
samment vite pour ne pas caler mais pas trop rapidement à 
cause des limitations !. 

Il y a deux vues du terrain sur votre écran : la première est la- 
térale et vous montre en pleine action, la seconde semble être 
prise d'un hélicoptère et vous permet de vous situer à droite 
ou à gauche du terrain ce qui est parfois utile car certains obs- 
tacles sont placés à l'extrême gauche ou à l'extrême droite. 
Les trois premiers parcours, ainsi que les suivants, peuvent 
être effectués dans n'importe quel ordre. Si vous réussissez à 
descendre en dessous du temps minimum sur un des parcours, 
vous n'aurez plus le choix qu'entre deux terrains et ainsi de 
suite jusqu'à épuisement des parcours. 



Edité par : Gremiin 
Prix indicatif ;K7, 99F 
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Super Scramble ne plaira pas à tout le monde : les graphismes sont bons mais les couleurs pas terribles. tfl ff% A {% 

L'animation est parfois molle et le son ne transcendera pas la moindre oreille. Ben alors, c'est nul? "" :i ' "'' 

Finalement on peut se laisser prendre au challenge et même, sans comparer ce logiciel à un simulateur, 
trouver du plaisir à vaincre les différents obstacles. 
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944 Turbo Cop 

4x4 Off road racing 

3D Grand Prix 

A 320 

Action Service 

Activator 

A t ter Burner 
Airbome Ranger 
Alternative World Games 
Anglais débutant 
Anglais confirmé 4e/3e 
Anglais top niveau 

ATV Simulator 
A view to a kill 



Loridels 

Epyx 

UbiSoft 

Loriciels 

Cobra 

199 Sélection 

Esat 

Activision 

MicroProse 

Gremlin 

Cedic Nathan 

Cedic Nathan 

Cedic Nathan 

Gremlin 

Code Master 

Bug Byte 



n°I8 


Daley Thompson' s Olympic 


Océan 




Dan Dare 


Ricochet 




Dark Fusion 


Gremlin 




Dark Side 


Incentive 


n°26 


Démons Re venge 


Firebird 


n°28 


Destination Maths 


Génération 5 




Discobole* 


Micrologie 


30-31 


Dragon Ninja 


Imagine 


n°29 


Dynamic Duo 


Firebird 


n"27 


Dynamite 


Océan 



Balade à Cologne 

Barbarian I! 

Batman 

Beach Head 

Biat 

Big Flash er* 

Blaster oïd s 

Bob Morane Océans 1 

Bobo 

Bomb Jack 

Bouldeur 

Bumpy 

By fair means or foui 



Chicago 30 
Chicago 90 
Chôme du 

ChuckYeager'sAFT 
Circus Games 
Contact* 
Corruption 
Crazy carsn 
Crucial Test 
Cybernoïd II 



Cedic Nathan 
Palace Software 

Americana 
Microfutur 
Duchet Computer 
Image Works 
Infogrames 

Encore 
B.E.P. 
Loriciels 
AUigata 

USGold 

Microïds 

Vidéomatique 

Electronic Arts 

Tynesoft 

Esat 

Rainbird 

Titus 

Coktei Vision 

Hewson 





Access Software 


n°30 


Exams 


Micro C 


n°33 


Fairbank* 


Knight-darke 


n°33 


Fernande! must die 


Image Works 


n D 23 


Fire and Forget 


Titus 


n° 26-31 


Fonctions numériques 


Pilât Informatique 




Football Manager II 


Addîctive 






Cedic Nathan 


n°29 


Français réussite 3è 


Cedic Nathan 


n°30 


Frank Bruno 1 s Big Box 


Elite 


n°27 


Freedom 


Coktei Vision 


n°27 


Fusion II 


Loriciels 


n D 27 


Galactic Conqueror 


Titus 


n°29 


Game Over II 


Electronic Arts 




Gargoyle Classics 


Melbourne House 


n°31 


Gary Lineker's hot shot 


Gremlin 


n°32 


Géométrie Plane 


Pilât Informatique 


n°32 


Géo-primaire 


Micro C 


n D 29 


GlHero 


Firebird 




Gold, Silver, Bronze 


Epyx 


n°26 


Grammaire 65 


Micro C 


n°34 


Grammaire langue française 


Cedic Nathan 


n"34 


Guerrilla War 


Imagine 


n° 27-28 


Gunship 


MîcroProse 


n°31 



GESTION DE FICHIERS 



La capacité mémoire du 6128 
n'est pas toujours exploitée par 
les logiciels du commerce (be- 
cause la compatibilité descendante). 
Et pourtant les 64 Ko supplémentai- 
res du 61 28 pourraient être utilisés pour 
stocker et échanger des Informations 
de manière très rapide par rapport à 
une unité à disquettes. Prenons, par 
exemple, le cas d'une gestion de fi- 
chiers (comme par hasard I). Il peut 
être intéressant de conserver des 
données en mémoire afin de pouvoir 
faire des recherches ou des tris ultra- 
rapides. 



Gestion de fichiers, vous l'avez 
compris fonctionne uniquement sur 
6128. D'ailleurs, dès la mise en mar- 
che, on vous demande d'insérer la 
disquette système livrée avec la 
machine. Il s'agit bien sûr de charger 
lebankman. Bon point donc pour l'Ins- 
tallation qui ne nécessite pas de 
manipulation de fichiers. La disquette 
étant déprotégée contre l'écriture, 
l'Initialisation ne s'effectue que lors de 
la première utilisation. 

Le programme cherche tout de 
suite si un fichier de données est déjà 
présent sur la disquette. SI ce n'est pas 
le cas. Il affichera un message vous 
Indiquant qu'il n'a rien trouvé, ainsi 



qu'une liste d'options nécessaires à 
la création d'un tel fichier. Comme 
plus personne ne l'Ignore de nos jours, 
un fichier est composé de champs qui 
constituent autant de rubriques pour 
votre futur fichier. On peut ainsi avoir 
un champ «Nom». «Adresse», etc. Il 
reste encore à définir le type de don- 
nées qui prendront place à l'Intérieur 
des champs et à Indiquer une lon- 
gueur si le champ est de type «ca- 
ractères» (dans les deux autres cas, 
la longueur des données est prédéfi- 
nie). Pour le type «logique» H y a deux 
valeurs possibles : vrai ou faux (V ou 
F) et pour le type «date» le format JJ/ 
MM/AA est de rigueur. 

Mais pour utiliser une gestion de 
fichiers. Il faut avoir des fiches. Le menu 
«enregistrement» est là pour ajouter 
des données selon les champs déjà 
définis. Là aussi , ld convivialité est de 
règle puisque vous disposez d'un édi- 
teur pleine-page : un marqueur noir 
se déplacera devant les différents 
champs sous l'impulsion des touches 
fléchées. Bien sûr II est toujours possi- 
ble de modifier ou de retirer des don- 
nées plus tard et ceci en utilisant les 
filtres. Les filtres, comme leur nom l'in- 
dique, sélectionnent certaines don- 
nées de certains champs. Par exem- 
ple si vous voulez modifier dans votre 
carnet d'adresses tous les numéros de 
téléphone des Parisiens le filtre sera 
«Ville=PARIS» et vous pouvez ajouter 
des opérateurs logiques à cette défi- 
nition : AND Téléphone <> «» pour ne 
disposer que des personnes ayant le 
téléphone. 

Une autre particularité du pro- 
gramme est la création de masques. 
SI vous voulez, par exemple, sortir des 



étiquettes. Il convient de disposer les 
données autrement qu'à la queue leu 
leu. Toujours en utilisant les touches flé- 
chées, vous n'aurez aucun problème 
à modifier la position originelle. Il peut 
y avoir jusqu'à 10 masques et 10 fil- 
tres différents portant chacun un nom 
propre. 

L'option filtre est présente mais elle 
autorise le tri uniquement sur un 
champ (ascendant ou descendant) 
ce qui limite les possibilités dans ce 
domaine. Enfin avec les filtres on peut 
arriver à obtenir presque ce que l'on 
veut: 



La sortie du fichier peut être diri- 
gée vers l'écran, vers un autre fichier 
ou vers l'Imprimante. Dans ce dernier 
cas II est possible de définir les para- 
mètres de la machine pourvu qu'elle 
soit compatible Epson. 

Gestion de fichiers est très Intéres- 
sant pour gérer efficacement toutes 
sortes de fichiers. Même une personne 
complètement néophyte en la ma- 
tière n'aura pas de gros efforts à four- 
nir pour s'adapter au programme. 
D'autant que la plupart des comman- 
des sont Inscrites à l'écran. 

Edile par : Micrologie (1 ) 69.21 .61 .65 
Prix Indicatif : 290F 



JNITIATIO^ 

APPRENONS 
A PROGRAMMER 



Dans la grande famille des Amstradistes, il y en 

a qui, après avoir tapé quelques listings trouvés 

dans leur revue favorite, ont eu envie de créer 

eux aussi des programmes. Ils ont étudié 

attentivement le dictionnaire BASIC du manuel 

avec ses quelques exemples, lu quelques 

articles à thème dans AMSTRAD-CPC, 

et se sont lancés sur leur clavier. 




Au début, les petits program- 
mes de une à quelques di- 
zaines de lignes finissaient gé- 
néralement par tourner. Les premiers 
succès les ayant mis en confiance. Ils 
ont abordé des projets plus ambitieux. 
Et c'est là que les choses se sont gâ- 
tées. Déception, découragement, 
abandon pour certains. Pourquoi ? 

C'est que pour programmer, de 
la manière la moins laborieuse possi- 
ble et en se donnant au départ le 
maximum de chances de succès, Il 
ne suffit pas de connaître un langage 
de programmation, en l'occurrence 
le BASIC. 

Qu'est-ce qui manquait dans le 
scénario évoqué ? Trois choses essen- 
tielles : 

• l'analyse du problème à résoudre, 
autrement dit de ce qu'on veut faire, 

• un minimum de méthode dans la 
conception et l'écriture du program- 
me, 

• un peu d'expérience dans sa mise 
au point, c'est-à-dire une connaissan- 
ce au moins élémentaire des pièges, 
ainsi que des messages d'erreur et de 
ce qu'ils Impliquent. 

Croyez-moi sur parole, vous le cons- 
taterez d'ailleurs bientôt vous-mêmes 
: un programme", même conçu avec 
méthode, fonctionne rarement au 
premier Run ; Il y a au moins des fau- 
tes de frappe (Syntax Error I). et la plu- 
part du temps des oublis ou de peti- 
tes erreurs de conception ou d'écri- 
ture (celles-là ne donnent générale- 
ment pas de messages d'erreur, mais 
des résultats vraiment bizarres). Com- 
mence alors la phase de mise au 
point, et là II faut être encore plus mé- 
thodique pour éviter les crises de nerfs. 

Cette série d'articles n'est pas un 
cours d'Initiation au BASIC, mais sup- 
pose au contraire que ce langage soit 
connu dans ses grandes lignes. Elle ne 
s'adresse pas vraiment aux tout dé- 
butants (bien qu'ils puissent par la suite 
en tirer profit), mais plutôt à ceux qui 
connaissent déjà le BASIC, mais man- 
quent d'une méthode sûre pour con- 
crétiser leur rêve. Je tiens à préciser 
que la méthode exposée n'est pas 
une recette rigide, mais seulement un 
ensemble de principes souples, qu'il 
est parfaitement légitime d'adapter 
à chaque cas particulier, voire de sim- 
plifier si nécessaire. 



DISCOURS 
DE LA METHODE 



Examinons dans l'ordre comment 
se présentent les choses quand on 
veut réaliser un programme. Au dé- 
but, on a une Idée généralement va- 
gue (qui dira le contraire ?) de ce 
qu'on veut faire. 



SAVOIR CE QU'ON 
VEUT FAIRE 

La première chose à faire est de 
définir clairement le but qu'on veut 
atteindre en posant l'énoncé du pro- 
blème. Il s'agit tout simplement de dé- 
crire, en quelques lignes, avec le maxi- 
mum de précision mais sans entrer 
dans les détails, le ou les résultats qu'on 
veut obtenir. On s'oblige ainsi à sortir 
du flou plus ou moins artistique. Pour 
bien me faire comprendre. |e vais choi- 
sir un exemple simple, et en faire l'ana- 
lyse pas à pas. Eh oui. c'est bien d'ana- 
lyse qu'il s'agit ; mais n'ayez pas peur, 
ce grand mot recouvre des notions 
logiques beaucoup plus simples qu'on 
ne le croit. 

Fixons-nous le but suivant ; «Réali- 
ser un menu à 3 options». C'est clair, 
mais pas tout à fait assez précis à ce 
nfveau de l'analyse ; en effet, les me- 
nus sont très variés en fonction du mo- 
de de désignation de l'option cou- 
rante, celle qui est pointée sous le nom 
de barre de choix ou barre de menu 
• (flèche mobile, vidéo Inverse, enca- 
drement, changement de couleur) ou 
du mode de choix (frappe d'un nom- 
bre ou de l'Initiale de l'option). Il faut 
donc faire un... choix. Ajoutons à la 
description du but : «Avec désigna- 
tion de l'option courante par vidéo 
Inverse» (ça fait tellement pro !). Ce 
sera tout pour l'Instant. Vous avez re- 
marqué que nous n'avons pas encore 
précisé par quel(s) moyen(s) nous es- 
pérons obtenir ce résultat. C'est que 
nous n'en savons encore rien. 



SAVOIR COMMENT 
ON VEUT LE FAIRE 

Pour le savoir, il faut procéder à 
l'étape suivante de l'analyse. Jus- 
qu'Ici, nous n'avons volontairement 



examiné le problème que de très loin. 
Alorsapprochons-nousunpeu. Un but, 
précisons-le, est atteint par la combi- 
naison de différentes actions élémen- 
taires, pouvant appartenir à des do- 
maines différents, et se succéder dans 
le temps. Un objectif est le résultat at- 
tendu d'une action élémentaire qui 
peut concourir, avec d'autres, à la 
réalisation d'un but donné. Ce sont 
des définitions très générales, appli- 
cables à toute méthode de résolution 
de problèmes complexes, pas seule- 
ment de nature Informatique. Le prln- 
clpedelaméthodeestslmple. Face 
à un problème représentant une ac- 
tion complexe, mais dont on a au 
préalable déterminé le but. Il s'agit de 
décomposer cette action en plusieurs 
actions élémentaires de nature diffé- 
rente et autonomes, bien qu'elles coo- 
pèrent à la bonne fin de l'ensemble. 
Puis on répète l'opération sur chacune 
des actions élémentaires ainsi Isolées, 
et ainsi de suite jusqu'à obtenir des 
éléments très simples, faciles à traduire 
dans un langage de programmation. 
Et II est parfois plus facile d'Isoler ces 
actions de plus en plus élémentaires 
en Identifiant les objectifs correspon- 
dants, puis les sous-objectifs, etc. Al- 
lons bon. j'en vois qui ont déjà décro- 
ché au fond de la classe, alors reve- 
nons à notre exemple. 

Pour faire fonctionner un menu à 
3 options, avec désignation de l'op- 
tion courante en vidéo Inverse, quel 
sera notre 1 er objectif ? De toute évi- 
dence, commencer par afficher les 
3 options du menu. C'est l'objectif N° 
1 . Au fait, c'est quoi l'option couran- 
te ? Même si nous n'avons jamais pro- 
grammé de tels menus, nous en avons 
déjà vus, non ? 

A première vue, l'option courante 
c'est celle qui à un moment donné 
est en vidéo Inverse, correspondant 
donc à un choix provisoire qui n'at- 
tend que l'appui sur une certaine tou- 
che pour être validé (ce qui appelle 
l'action correspondante), ou sur une 
certaine autre touche pour passer à 
l'option suivante, qui se met à son tour 
en vidéo inverse, alors que la précé- 
dente revient en vidéo normale. Alors 
Il faudrait peut-être prévoir qu'au pre- 
mier affichage du menu il y ait déjà 
une option en vidéo inverse (c'est gé- 
néralement la première) : objectif N° 2. 

Pour modifier ce bel état de cho- 
ses, le programme doit réagir à une 
Intervention extérieure, l'appui sur une I 
69 ■ 



touche ; c'est une entrée, en l'occur- 
rence une entrée au clavier (dans 
d'autres types de programme, ce 
pourra être une entrée à partir d'un 
fichier, ou du joystick, etc.). Donc ob- 
jectif N° 3 = réaction à une entrée cla- 
vier. 

Survant la touche pressée, nous au- 
rons soit la validation (objectif N° 4) 
soit le passage à l'option suivante . 
ce qui modifie l'affichage (objectif N° 
5). Les objectifs 1 , 2 et 5 sont des sor- 
ties à l'écran (dans d'autres cas. on 
peut avoir des sorties sur fichier, sur Im- 
primante, etc.). 

Vous voyez peut-être mieux main- 
tenant pourquoi je vous disais que les 
actions élémentaires sont différentes 
entre elles et autonomes. SI une ac- 
tion élémentaire peut en effacer une 
autre (modification de l'affichage du 
menu par passage à l'option suivan- 
te), ces 2 actions élémentaires sont 
Indépendantes dans leur nature, car 
on peut les décrire, les décortiquer in- 
dépendamment l'une de l'autre, 

C'est d'ailleurs ce que nous allons 
devoir faire. En effet, cette étape de 
l'analyse consiste simplement à 
mérer avec précision toutes les ac- 
tions élémentaires qu'il faudrait effeo 
tuer à la main pour atteindre le bul 
fixé. Et ce qui a été décrit jusqu'Ici n' 
pas encore assez élémentaire, mon 
cher Watson. pour y parvenir. Nous al- 
lons donc devoir décomposer certains 
objectifs en sous-objectifs. 

• Objectif N° 1 : afficher le menu. 
Afficher les 3 options du menu; OK. 
maissulvantquelle disposition ?Vous 
vous demandez, j'en suis sûr. si c'est 
maintenant que nous allons choisir en- 
tre menu horizontal (avec options ali- 
gnées sur une ligne) et menu vertical 
(options superposées). Franchement, 
Je vous dirai qu'à ce stade de l'ana- 
lyse c'est un problème tout à fait mar- 
ginal que nous réglerons en temps uti- 
le. Il suffit de définir 3 positions diffé- 
rentes et : 

- afficher le libellé de l'option 1 en po- 
sition 1 . 

- afficher le libellé de l'option 2 en po- 
sition 2, 

- afficher le libellé de l'option 3 en po- 
sition 3. 

• Objectif N° 2 : mettre en vidéo 
Inverse la Ire option. 

kRIen de particulier à décortiquer, mais 



une petite précision à apporter 

- afficher le libellé de l'option 1 en vi- 
déo inverse en position 1 . 

• Objectif N° 3 : réagir à une entrée 
clavier. 

Tout d'abord. Il faut marquer le pas 
tant qu'une touche n'est pas enfon- 
cée, C'est une boucle d'attente. 

Suivant la touche enfoncée, il de- 
vra y avoir orientation, soit vers l'ob- 
jectif N° 4, soit vers l'objectif N° 5. Il 
faut donc d'abord définir les 2 tou- 
ches actives (c'est-à-dire les seules qui 
auront une action dans cette partie 
du programme), et prévoir, si une au- 
tre touche est enfoncée, un retour à 
la case départ, autrement dit la bou- 
cle d'attente, afin de ne pas planter 
bêtement le programme ou l'envoyer 
sur une voie sans Issue. Choisissons, par 
exemple, la touche ENTER et la tou- 
che ESPACE (parce que c'est géné- 
ralement l'habitude, mais on aurait pu 
choisir n'Importe quoi) : 

- si touche pressée = ENTER alors ob- 
jectif N° 4 (validation) sinon si touche 
pressée = ESPACE alors objectif N° 5 
(option suivante) sinon boucle d'at- 
tente. 

C'est ce qu'on appelle un test, 

• Objectif N Q 4 : déclencher l'opéra- 
tion correspondant à l'option choisie. 
Chaque option doit appeler une ou 
des actions particulières, absentes Ici 
puisqu'il s'agit d'un menu de démons- 
tration. Il faut cependant prévoir com- 
ment le programme peut savoir quelle 
action II doit appeler. La notion d'op- 
tion courante et un autre test vont 
nous sortir d'affaire : 

- si option courante = option 1 alors 
action 1 sinon si option courante = 
option 2 alors action 2 sinon action 3. 

• Objectif N° 5 : passer à l'option sui- 
vante. 

A la notion d'option courante, ajou- 
tons celle de position courante, et nous 
allons beaucoup nous simplifier la vie. 
Mais oui, la position courante, c'est 
la position occupée par l'option cou- 
rante, comment avez-vous deviné ? 
Il faut : 

- effacer la vidéo Inverse de l'option 
courante, donc afficher le libellé de 
l'option courante en vidéo normale 
à la position courante ; 

- se placer sur la position suivante, et 
y afficher le libellé de l'option suivante 
en vidéo inverse ; 



- la nouvelle position devient la posi- 
tion courante, et la nouvelle option 
l'option courante. 

Il faut aussi attendre une validation 
éventuelle, ou un nouveau change- 
ment d'option, donc : 

- retourner à la boucle d'attente ; ce 
retour à une action précédente est 
une autre forme de boucle, 

Cela vous paraît chouette ? OK, pas- 
sons de l'option 1 à l'option 2, de l'op- 
tion 2 à l'option 3, et de l'option 3 à 
la suivante.., Damned, y a plus d'op- 
tion suivante à afficher I 
Petite précaution , Intercaler en 2ème 
position le test suivant : 

- si position courante = position 3 alors 
position suivante = position 1 et op- 
tion suivante = option 1 . 

Cette fols, tout paraît OK. 

Nous venons de voir les 2 premiè- 
res étapes de l'analyse : d'abord la 
définition précise du but à atteindre, 
puis le découpage en actions élémen- 
taires successives, nécessaires pour 
parvenir à ce but. Maintenant que 
tout le monde a compris, nous pour- 
rons lalsser-de côté la notion d'objec- 
tifs Intermédiaires qui avait pour prin- 
cipal Intérêt de rendre plus éviden- 
tes les limites du découpage. Si les ex- 
pressions tarabiscotées vous Intéres- 
sent, sachez que cette savante dé- 
coupe est appelée analyse fonction- 
nelle par les Informaticiens. On l'ap- 
pelle fonctionnelle parce qu'elle sert 
à décortiquer le fonctionnement d'un 
ensemble complexe. I 



Savez-vous que vous venez d'ac- 
quérir, mine de rien, toutes les notions 
Indispensables pour effectuer l'ana- 
lyse d'un programme, quel qu'il soit ? 

Vous avez appris à décomposer 
de proche en proche un problème 
complexe en éléments plus simples, 
en commençant par un survol global 
à haute altitude, pour finir tout en bas. 
au niveau des détails. Retenez que 
l'analyse d'un problème se fait du 
haut vers le bas. Vous avez appris à 
Identifier les entrées, et les actions élé- 
mentaires qui les utilisent pour fournir 
les sorties. Suivant les cas, il sera plus 
commode de définir d'abord les en- 
trées, ou au contraire les sorties. Peu 
Importe, Ces actions élémentaires, 
vous en avez déjà entendu parier ; 
on les appelle routines, procédures, 
sous-programmes ou modules. En ana- 
lysant rationnellement notre problème 
dans le seul souci de le décomposer 
en éléments de plus en plus simples, 



donc de plus en plus faciles à trans- 
crire en un langage de programma- 
tion, nous avons, presque en tant que 
sous-produit, fait apparaître une struc- 
ture modulaire. Blen'entendu, le pro- 
gramme une fois rédigé reflétera cette 
structure. Vous venez tout simplement 
d'apprendre à faire de la program- 
mation structurée, ou programmation 
modulaire. Non seulement ta program- 
mation structurée est beaucoup plus 
facile à mettre en oeuvre que toute 
autre méthode (ou absence de mé- 
thode), mais c'est le seul moyen de 
parvenir rapidement à un résultat fia- 
ble, en se fatiguant au minimum. Tous 
les pros vous le diraient, en informati- 
que Il faut savoir être fainéant avec 
Intelligence. 

Enfin, et toujours sans en avoir l'air, 
vous venez de voir les deux fonctions 
fondamentales en programmation. 
Que fait donc un programme, en gé- 
néral ? Il reçoit des entrées, leur fait 
subir des traitements et s'en sert pour 
élaborer des sorties. Mais un program- 
me de pius de quelques lignes ne sau- 
rait être linéaire et à sens unique ; il 
faut des aiguillages, des répétitions, 
parfois des retours en arrière. Ces fonc- 
tions sont assurées par les tests et les 
boucles. 

Grisés par toute cette science, 
nous ne devons pas oublier que no- 
tre analyse n'est pas terminée. Si l'ana- 
lyse fonctionnelle nous permet d'ob- 
tenir une description suffisamment dé- 



taillée des opérations nécessaires pour 
pouvoir les effectuer à la main, c'est 
encore trop imprécis pour les traduire 
directement en un programme. Sou- 
venez-vous : unordinateurc'estbête. 
Il faut tout lui expliquer, et encore dans 
un langage qu'il soit capable de com- 
prendre. Je sais, le BASIC c'est fait pour 
ça. OK. Alors, dites-moi un peu com- 
ment vous allez lui expliquer, en BA- 
SIC, qu'il faut passer de la position cou- 
rante à la position suivante, et y affi- 
cher le libellé de l'option suivante en 
vidéo inverse ? 



SAVOIR COMMENT 

LA MACHINE PEUT 

LE FAIRE 

Il faut procéder à la dernière étape 
de l'analyse, appelée analyse orga- 
nique, en descendant d' un degré sup- 
plémentaire dans les détails encore 
cachés. Les actions élémentaires ré- 
sultant de ce dernier décorticage de- 
vront être compatibles avec les con- 
traintes de ia machine utilisée. Par 
exemple. Inutile d'envisager des lignes 
de 80 caractères en 4 couleurs à 
l'écran, ou en BASIC une animation 
graphique sans saccades avec musi- 
que de fond en continu ; Il pourra être 
nécessaire de tenir compte de ia pré- 
sence ou de l'absence d'un lecteur 
de disquettes. 



Enfin, et c'est le cas de notre exem- 
ple, il faudra souvent se pencher sé- 
rieusement sur le problème de la re- 
présentation des données. Aïe, encore 
un gros mot. Nous avons vu que nos 
mignons petits modules, tout en étant 
indépendants, coopèrent entre eux 
(drôle de paradoxe 1). Ils coopèrent 
en faisant quoi ? En échangeant des 
données, pardi 1 

Et c'est quoi, les données ? Au ni- 
veau du problème à résoudre, ce sont 
les objets manipulés par les différen- 
tes actions élémentaires que nous ve- 
nons de démontrer. Exemple : l'ac- 
tion élémentaire «afficher le libellé de 
l'option 1 en position 1», c'est en fait 
une action simple d'affichage. Qui a 
dit PRINT ? Pour l'Instant on parle en 
français, pas en BASIC. On affiche 
quoi? L'objet «libellé de l'option 1». 

On l'affiche où ? A un endroit défini 
par l'objet «position 1». Vous voyez, 
c'est pas sorcier. 

Au niveau de l'ordinateur, une 
donnée c'est une adresse mémoire 
ou son contenu, rien d'autre. Dans un 
langage de programmation, ça se tra- 
duit par une constante ou une varia- 
ble, constituée d'un nom (contenant) 
etd'unevaleur(contenu) ; ne jamais 
confondre les deux ! L'ordinateur sait 
parfaitement relier varia blés ou cons- 
tantes etadresses mémoire correspon- 
dantes. 




Puisque nous revoici en terrain 
mieux connu, rappelons que constan- 
tes et variables sont de trois types : 
réel, entier ou chaîne de caractères, 
et que chaque type se fait en deux 
tailles : normale, et indicée à 1 , 2, n 
dimensions (on parle aussi dans ce cas 
de matrice ou de tableau). 

Et pour obtenir quelque chose qui 
tienne la route, il est Impératif que les 
objets identifiés dans la dernière étape 
de l'analyse soient représentés dans 
le programme conformément à ce 
schéma. De plus, Il faut rechercher le 
type de représentation le plus con- 
venable d'un objet donné, en fonc- 
tion des exigences du programme. S'il 
apparaît évident que l'objet «libellé 
de l'option 1 » sera une constante de 
type chaîne, par contre on ne sent 
pas bien quelle sera la manière la.plus 
opportune de représenter les objets 
«option courante» ou «option suivan- 
te", pas vrai ? 

Plutôt que de mettre la charrue 
avant les bœufs, Il faut commencer 
par recenser tout ce qui , dans ce que 
nous avons analysé Jusqu'à présent, 
paraît ressembler à ces fichus objets, 
ou données si vous préférez. En même 
temps, essayons de déterminer si ce 
sont des constantes ou des variables, 
et autant que possible leur type, en 
classant le tout par catégories, Voici 
ce que ça peut donner. 



- libellé de l'option 1 

- libellé de l'option 2 

- libellé de l'option 3 



- libellé de l'option 
courante 

- libellé de l'option 



— position 1 
constantes — position 2 

- position 3 



variables - position courante 
-position suivante 



- touche pressée type ? 



constantes -option 1 
■ option 2 



variables - option courante 
option suivante 



Vous allez me dire : et alors ? Ce 
petit tableau est pourtant riche d'In- 
formations, Pour 3 genres de données, 
à savoir «libellé», «position» et «option», 
nous avons 3 constantes (sauf pour 
«option» puisque l'option 3 n'est pas 
utilisée Ici) et 2 variables («courante» 
et «suivante»), Celles-ci sont reliées en- 
tre elles par une relation simple ; si l'op- 
tion courante n'est pas la N° 3, on ob- 
tient l'option suivante en ajoutant un 
Incrément Gel 1 ) au N° de l'option cou- 
rante ; si c'est la N° 3, l'option suivante 
sera la N° 1 , nous l'avons déjà vu. De 
plus, Il y a redondance. Dans chacun 
des 3 genres, la variable «courante» 
correspond forcément à une des 3 
constantes, de même pour la varia- 
ble «suivante». Suite à la relation que 
nous venons de démontrer, la varia- 
ble «suivante» est inutile. Supprimons- 
la. Vous admettrez également qu'il y 
a une relation entre une option (qui 
correspond au déclenchement d'une 
action par appel du sous-programme 
adéquat), le libellé de cette option, 
et la position où s'affiche ce libellé : 
cette relation c'est le numéro (1 à 3), 
Avec cela nous devons pouvoir sim- 
plifier considérablement la liste, en la 
rendant plus claire. 

Il nous reste : 

- 3 variables (libellé, position et op- 
tion) pouvant prendre chacune 3 va- 
leurs qui, elles, sont constantes d'un 
bout à l'autre du programmé, 

- 1 numéro qui peut prendre égale- 
ment 3 valeurs (1 . 2 ou 3), 

- la variable «touché pressée», de 
type pour l'instant Inconnu. 

- la variable «courante». 

Nous pouvons supprimer égale- 
ment cette dernière, car elle ne sert 
à rien. En effet, par définition, la va- 
leur courante d'une variable, c'est sa 
valeur actuelle, celle qui reste prise 
en compte depuis sa dernière modi- 
fication et avant la prochaine, OK ? 
Donc si je veux connaître ta valeur cou- 



rante de «libellé», de «position» et 
d'»option», il me suffit de connaître la 
valeur actuelle du numéro. Ce numé- 
ro est un nombre, qui ne peut évidem- 
ment avoir qu'une valeur à la fois sto- 
ckée quelque part dans la mémoire 
de l'ordinateur, En examinant le con- 
tenu de cette adresse l'ordinateur 
peut Indirectement prendre connais- 
sance de lo valeur courante dé nos 
. trois variables. 

Ce numéro, que je me suis bien 
gardé d'appeler variable, qu'est-ce 
donc ? D'un point de vue très géné- 
ral, on peut appeler ça un pointeur. 
Mais dans le cas qui nous préoccupe, 
c'est un Indice, et nos 3 variables se- 
ront les variables Indicées. Vous com- 
mencez à comprendre ce qu'on en- 
tend par représentation des don- 
nées ? 

Le mode de représentation que 
nous avons choisi a été conditionné 
par la nécessité de permettre à l'or- 
dinateur de toujours savoir quelles sont 
l'optbn et lo position courantes, D'au- 
tres modes 'de représentation sont pos- 
sibles, mais celui-ci est de loin le plus 
simple à mettre en ceuvre, et en mê- 
me temps lé plus souple. Si nous dési- 
rons par la suite réutiliser le programme 
pour bâtir un menu à 1 options. Il suf- 
fira de prévoir un Indice variant de 1 
à 10, et les 1 valeurs possibles de nos 
3 variables. 

Revenons à notre menu et conti- 
nuons à chercher à faire simple. Nous 
avons un Indice de contrôle variant 
de-1 à 3, et 3 variables. La première 
idée qui vient est de rentrer tout ça 
dans une seule variable à 2 indices, 
ou matrice à 2 dimensions, Le premier 
Indice est notre indice de contrôle (li- 
gnes de la matrice), le second pointe 
sur chacune des 3 variables (colon- 
nes de la matrice) ; inscrivons dans 
ies cases les valeurs des variables : 



Libellé 


position 


Option 


libellé 
1 


coordonnées 
1 


1 


libellé 
2 


coordonnées 
2 


2 


libellé 
3 


coordonnées 
3 


3 



Pour chaque valeur de l'Indice de 
contrôle, la variable «option» est égale 
à cette valeur. Nous pouvons donc 
la supprimer. 

Je sens que vous allez objecterque 
chaque valeur de la variable «posi- 
tion» représente un couple de coor- 
données, et Jusqu'à preuve du con- 
traire la valeur d ' une variable est uni- 
que. Certes. Mais, dites-mol, dans un 
menu horizontal , les libellés des options 
sont bien disposés sur une même li- 
gne ? Dans ce cas, l'ordonnée y est 
bien constante, non ? Et dans un me- 
nu vertical , les libellés sont bien alignés 
à gauche ?Doncc'estrabsclssexqui 
est une constante, cette fols. Parcorv 
séquent, et selon le cas, les 3 valeurs 
possibles de la variable «position» re- 
présenteront l'abscisse ou l'ordonnée. 

Il va y avoir quelques choix à faire. 
Décidons de construire un menu ver- 
tical, en laissant une ligne vierge en- 
tre 2 options consécutives (double 
Interligne) .-c'est plus Joli, et puis si on 



décidait par la suite de pointer l'op- 
tion courante non plus en vidéo In- 
verse, mais par un encadré, on ne sait 
jamais. . . Décidons de travailler en Mo- 
de 1. Fixons l'abscisse commune à 10, 
par exemple et l'ordonnée de la 1 re 
option à 5. Avec le double Interligne, 
l'ordonnée de la 2ème option sera 
égale à 7 et celle de la 3ème option 
à 9. Parfait. Cela nous donne donc, 
pour l'Indice de l'option un Incrément . 
de 1 , et pour la position un incrément 
de 2. On devrait pouvoir résumer cela 
en une petite formule mathématique. 
Si nous appelons y l'ordonnée et I l'in- 
dice courant, nous obtenons y = 3 + 
(I " 2) ; 2 étant l'Interligne, pour I = 1 
nous avons bien y = 5 ; pour i = 2 nous 
avons y = 7 et pour I = 3 nous avons y 
= 9. Résultat des courses : nous n'avons 
plus besoin de la variable «position» ; 
vous connaissez le sketch de Fernand 
Raynaud sur les «œufs pas chers» ? Re- 
marquez bien- que si nous sommes 
parvenus à supprimer ainsi 2 variables, 
c'est suite à notre analyse ; rappelez- 
vous comme ça paraissait compliqué 



au départ. D'où l'Intérêt de travailler 
avec méthode et de ne pas courî- 
clrculter les étapes. 

Le programme devra contenir, 
sous forme de constantes, les 3 libel- 
lés du menu. Ces valeurs seront four- 
nies à une variable Indicée, respecti- 
vement pour les valeurs d'indice 1 , 2 
et 3. Appelons cette variable libellée), 
i étant l'Indice courant (la variable sera 
dimens!onnéeà3). Dans la foulée, dé- 
finissons également comme constan- 
tes l'abscisse commune (x = 10), l'or- 
donnée de départ (yO = 3) et l' Interli- 
gne (il = 2) ; comme cela, si nous vou- 
lons modifier par la suite la présenta- 
tion de notre menu. Il n'y aura que la 
valeur des constantes à modifier. Tou- 
jours rechercher la souplesse ! 

Je crois que vous commencez à 
saturer, alors rendez-vous le mois pro- 
chain pour la suite de notre analyse. 



Guy DUBUS 



FORMATEUR 




Comme le titre 

l'indique, il s'agit de 

formater des disquettes 

suivant les standards : 

CPMVENDOR(169K) 

IBM (154 K) 

EXTRA (202 K) 

DATA (178 K) 

UTILISATEUR 



Tous ces formats peuvent mar- 
cher sur l'unité de disquette A 
ou B. Les formats CPM Vendor, 
IBM et DATA étant classiques, nous ne 
donnerons pas d'explications sur eux 
mais sur EXTRA et UTILISATEUR qui sont 
particuliers. 
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Le format EXTRA est un format spéclai 
qui formate votre disquette en 202 K 
avec 4 programmes dessus pour re- 
configurer le catalogue. Selon l'unité 
de travail. Il faut 'RUNer - DIRA ou DIR8 
pour avoir le catalogue sous 202 K. Et 
faire démarrer NORMALA ou NOR- 
MALB pour revenir sous 1 78 K. 
Le format UTILISATEUR permet à l'utili- 
sateur de formater les pistes qu'il veut 
et ceci de à 80 pistes. J'ai choisi 80 
pistes pour les lecteurs 5 pouces 1 /4 
externes B qui vont, pour certains, jus- 
qu'à ce chiffre. 

Pour utiliser le mode 202 K, un utilitaire 
(GESTION) de gestion du mode 202- 
1 78 a été créé. 

Le déplacement et la sélection s'ef- 
fectuent avec les flèches. 
L'option mode : elle permet de travail- 
ler dans le mode 1 78 K ou 202 K par 
face. 

L'option catalogue : elle permet d'ef- 
fectuer un catalogue ou de faire dé- 
marrer un programme dans le mode 
choisi. 

L'option effacer fichier : elle permet 
d 'effacer un fichier dans le mode choisi 
ou de changer le USER de travail de 
0à255. 



L'option copieur : elle permet de co- 
pier un fichier vers un mode sembla- 
ble ou différent du mode choisi. 
(Nota : à chaque copie de fichier, le 
programme va se détruire pour ga- 
gner de la place en mémoire et pren- 
dre ainsi les fichiers allant jusqu'à 42 K). 
Au BIP retentissant, Il faut changer de 
disquette et appuyer sur une touche 
pour la sauvegarde, lors de la copie. 

Chargement : 

Les programmes FORMAT.DA1 etFOR- 
MAT.DA2 créeront (après lancement 
par un RUN) les fichiers FORMAT.BI1 et 
FORMAT.BI2. Dans le listing principal 
FORMAT, il faut remplacer les espa- 
ces ou les symboles des lignes 410, 570 
et 680 par les CHRS Indiqués en REM. 

Stéphane ST MARTIN 



N'OUBLIEZ PAS ! 

AMSTAR & CPC 

SORT AUSSI 

EN AOUT ! 



FORMAT 

10 ' Le formateur disquette VI. (C) 1989 >LA 

20 ' "AHSTAR & CPC" Et "Stéphane Saint-Martin" >LB 

30 ' >LC 

40 MODE 0:BOEDER : J HK 0,0:INK 1.9: INK 2,18:INK 3,26:0U >AU 
T i,BC0Û,7:0UT f.BD00,33 

GO IF PEEX(iA005K>64 THEN SYMBOL AFTER 32:L0AD"FORHAT. >NA 
Bll\t9FFC:MEM0RY i2EFF:L0AD"F0RMAT.B12":CALL S,2FEA:P0K 
E 48622, 201:KEY DEF 66,0,0.0.0 

70 ON EHRDR GOTO 610 >NA 

80 MODE 2:CALL iBDlC,2:L0CATE 1, LsPRINT "Le foriateur d >RV 
isquette V 1.0 (Cl 1999 \CHR$(34);" AHSTAB k CPC ";CHR 
$(34);" b Stéphane Saint-Martin ." 



100 ' Henu principal 

110 ' 



130 LOCATE 1,3:PR!NT'TYPE DE FORMAT :": LOCATE 1.5:PRINT >ÏC 
"1 J CPK VENDOR (169 K)":LDCATE l,7:PRItfT"2 ) IBM (154 
K)":LOCATE 1,9:PRINT"3 ) EXTRA (202 K)":LOCATE 1 , 1 1 : PS 1 
NT*4 ) DATA (178 K)":LQCATE 1,13;PR1NT*5 ) UTILISATEUR" 

131 LOCATE 1, 15 ;PR LUT" VOTRE CHOIX:" >EZ 
140 A*=1NKEY$:IF A$="" THEN 140 >XR 
150 ON INSTR["i2345\A»>G0T0 26Q, 370, 480, 530, 630 : LOCATE )KP 

2,20:PR!NT CHR$(7):G0T0 140 



160 ' 

170 ' SELECTION DU LECTEUR DISQUETTE 



>RH 



190 CLS:LOCATE l,l:PRINT"Sel-ection du lecteur disquette >UN 

200 LOCATE l,5:PRINT"Lecteur "|CHRJ(34) ;"A";CHR$(34) ;" >UU 

ou ";CHR*(34);"B\CHR$(34);":" 

210 At=INKEY»:IF A$=" THEN 210 >XH 

220 OH lN5TR("ABab",Al)GÛT0 230 , 240. 230, 240: LOCATE 1,4: >CK 

PRINT CHRi(7):G0T0 210 

230 LOCATE 21,5:PR1NT"A":L0CATE l,B:PRINT'Appuvez sur u >CY 

ne touche pour continuer ,":CALL iBB18:RESTQRE 230;FOR 

i=fc27QO TG Î.2705 : READ a:POKE i,a:NEXT:DATA &3e,aû0,!,32, 

fcO0,&a7,ic9:RETURN 

240 LOCATE 21, B:PR]NT"B" :LOCATE l,S;PR,INT'Appuyez sur u >CC 

ne touche peur continuer .":CALL 4BBi8:RESTQRE 240:FQR 

1=1.2700 TO &2705;READ a:POKE i , a : NEXT : DATA !,3e.fc01,i32, 

iO0,fca7,tc9:RETURN 



250 ' 



>RH 



260 ' SELECTION DU FORMAT CPM VENDOR 1159 k) >RJ 
270 ' >hk 

280 GOSUB 190: CLS: LOCATE i,i:PR!NT"Fanat CPM VENDOR [1 >NH 
69 K);" 

290 LDCATE 1,2:PSINT "Inserez une disquette vierge dans >VG 
le lecteur et appuyez sur une touche. ":CALL tBBiB:G0SU 
B 790 
300 f$="AFBGCHDIE" ' CHR$ de 65,70,66,71,67, 72,66, 73,69 >HB 

310 s=U0:f=PEEK(àf$>lM25S*PEEK(âf$+2) )GL 

320 FOR p=0 TO 41:LDCATE 2,5:PRINT"Je foriatte la piste )PH 



330 CALL &2700:CALL iA61A,p,f >yD 

340 FOR se=l TO 9:CALL i2700:CALL &A600,p,s*se.!.BOOQ: IF >BD 

PEEK(iBF00)O0 THEN 330 
350 NEXT;NEXT:PRINT:PRINT"TRAVA1L FINI !":FOR 1=0 TO 70 >UH 
0:NEXT:G0T0 80 



360 ' 



)RK 



370 ' SELECTION DU FORMAT IBM (154 k) )TA 

380 ' >TB 

390 GOSUB 190: CLS: LOCATE l,l:PRINT"Fomat IBM (154 k):" )DC 

400 LOCATE 1,2:PR!NT "Inserez une disquette vierge dan3 >VZ 

le lecteur et appuyez sur une touche. ":CALL tBB18:G0SU 
B 790 

410 f$=" " ' CHR$ de 1,2,3,4,5.5.7,6,9 >PG 

413 ' CORRESPONDANCE DES CARACTERES >RJ 

415 ' CHR$(1)=CONTROL A , CHR$(2)=C0NTRÛL B , CHR$(3)=C >TA 
QNTROL C 

416 ' CHRï(4)=C0NTR0L D , CHRJ(5)=C0NÎRQL E , CHHÏ(6)=C )TB 
ONTROL F 

417 ' CH8*(7)=CQNTR0L G , CHR»(B1=C0NTR0L H , CHR*(9)=C >TC 
ONTBOL I 

420 s=0:t=PEEK(àf*HH256tPEEK(àf$+2) >EZ 

430 FOR p=0 TO 41: LOCATE 2,5:PRIHT n Je fcriatte la piste >PP 

: ":p 
440 CALL S.270û:CALL lA61A,p,f >yF 

450 FOR se=l TO 9:CALL tZ700:CALL iA600, p,stse,fcBO00: IF >BH 

PEEKUBFOOIOO THEN 440 
460 NEXT: NEXT :PRI NT: PR1NPTRAVAIL FINI !":FOR 1=0 TO 70 >UP 
Û:NF_XT:GOTO 80 



470 ' 



>TB 



480 ' SELECTION DU FORMAT EXTRA (202 kl >TC 

490 ' >TD 

500 GOSUB 190: CLS: LOCATE I.iîPfilNT'Formt EXTRA (202 k) >GX 

510 LOCATE l,2:PR!rJT "Insérez une disquette vierge dans >UG 
le lecteur et appuyez sur une touche. ";CALL iBB18:L0CA 
TE 2,5:PRIHT "Je fcriatte les 41 pistes . Patientez .": 
CALL fc2700:LECT=PEEK(i270i):CALL 16000, LECT,0:PRINT:PH1 
NT"TRAVAIL FINI !" 
515 FDR 1=0 TO 7OO:NEXT:G0T0 BO >ÏT 



520 ' 



>RH 



530 ' SELECTION DU FORHAT DATA (178 k) >RJ 

540 ' >RK 

550 GOSUB 190:CLS:L0CATE 1. l;PBï NT "Format DATA (178 k): >EF 

560 LOCATE 1.2:PHINT "Inserez une disquette vierge dans >VG 
le lecteur et appuyez sur une touche. ":CALL i.BB18:G0SU 

B 790 

570 f»="AFBGCHDIE* » CHR$ de 193, 19B, 194, 199, 195,200, 19 >AJ 

6,201,197 

580 s=kC0:r>PEEK(àf$+lH256ïPEEK(ài$t2) >GH 

590 FDR p=0 TO 41 iLOCATE 2,5:PRINT"Je îonatte la piste >PX 
: ";p 

600 CALL t270O:CALL tA61A,p,f >WD 

610 FOR se-1 TO 9:CALL t27Q0:CALL 6*500,^.5+86, 48000: IF >BD 
PEF_K((,BFOO)<>0 THEN 600 

620 NEXT:NEXT:PR1NT:PRINT"TRAVAIL FINI !":F0R 1=0 TO 70 >yH 

0:NEXT:GOTD 80 



630 ' 



>RK 



640 ' SELECTION DU FORMAT UTILISATEUR >TÀ 

650 ' >ÎB 

660 GOSUB 19Û:CLS:L0CATE 1, 1: PR1 WT"Fq mat UTILISATEUR : >GE 

670 LOCATE l,2:PRINT "Insérez une disquette vierge dans >UA 
le lecteur et appuyez sur une touche. ":CALL IBBlSiGGSU 
B 790 

680 fï="AFBGCHDIE n ' CHRt de 193, 19B. 194, 199. 195,200,19 >AL 
6,201,197 

690 s=lC0:f=PEEKIàft+l)+2S6iPEEKtàflt2) >GP 

700 !NPUT"PISTE DE DEBUT (0 a 80):\DEBU >KP 

710 IF DEBU>80 THEN DEBU-Û )UJ 

720 IHPUT"P1STE DE FIN 10 a 8Q):\F!N )FH 

730 [F FINOTU OR FIN=DEBU THEN FltN)EBU+l >HB 

740 IF F1N>80 THEN FIN=8Û >TK 

750 FGfi p=DEBU TO FIN:LDCATE 2. l2:PRINT"Je fonatte la )YD 



nste ; 



>UL 



760 CALL !,2700:CALL tA61A,p,f 

770 FOR se=l TO 9:CALL 1270Q:CALL 4A600,p,s+se, 8,8000: IF >CK 

PEEKIIBFOOIOO THEN 760 
780 NEÏT:NEXT:PR]HT:PR!NT"TRAVA!L FINI !":F0R 1=0 TQ 70 >WV 
0:NEXT:G0T0 80 

790 al^FE0X0DD6S01DDBEOODD5G04DD4E023A00A75FDF4AA6320 >TÏ 
OBFC9FEO2C0DD6601DD6E00DD4E023E09115OA6F5791213AF12137E 
12133E02121323F13D2OED513AO0A75F215OA6DF4DA6C93CCO0752C 
607VDEF1NT a-z:a=!,A600:FOR t=l TO LENia*) STEP 2:P0KE 
a.VALCt'-tHIDKai.t^Dîa^anîNEIT 

800 RETURN >ZD 

810 RESUME NEXT >LY 



FORMAT DA1 



10 ' DATAS du proarame FDRHAT.Bil 

20 ' ic) 19B9 AHSTAR 1 CPC 

30 ' ET STEPHANE SAINT-MARTIN 

40 ' 

60 FOR I=t9FFC TO 1A2F5:READ A$:PQKE I ,UAL(A() :NEXT 1 

70 SAVE" ! FQfiHAT . B 1 1 " , fl , fc9FFC, t2FB 

90 DATA 10,10,10,10,10,10,10,10,10,140 

100 DATA 1,4, 144, 144, 8,0, 140, 10,10,1AÛ,1A, 10 

110 DATA lQ,i0,10.1Q,tQ,160,S<F,i66,i66,lF 

120 DATA 460,10, 8,0.140, 1£. ICC. 1EE, 16. IE0, 140 

130 DATA 10,1DO,1D,122, 144, 1B,1BÛ, 10, 10,140 

140 DATA iA,144,!,55,lA,feI}0,lÛ,lÛ,120,l4,10 

150 DATA 5,0, 10,10,10, 8,0,420,14, 8,44,8,44. 14 

160 DATA 8,20,10,10.8,40,8.2,1,22,122,12,8,40,10 

l'/0 DATA 10,10,lA,144,lEE,8,4,lAO,10,8<0,iO 

ISO DATA 14,144,IEE,14, 140.10, 10, 8,0,10. 8,0 

190 DATA 10.12, 120, 140. 10, 10,10, 8,0, 1EE, 10 

200 DATA 10, (<0, 10, 10, 8,0, 10. 10, 8,4, 140, 10 

210 DATA 10,120. 12, 8,44. 1U, 16,180, 10, 10, 140 

220 DATA 1A,1AA,IAA,1A, 140, 8,0,10,140,8,0, 144 

230 DATA 144,14,lEO,iQ,tO,lEO,lA,i22,lEE,fcB 

240 DATA lEO,10.lO,iEQ,iA,166,122,lA,lEQ,10 

250 DATA 10,i8Û,lA,iAA,lE£,12,120,lQ,10,lEQ 

2S0 DATA ie.lEE.122.1A.t£0,lQ,lQ,lEQ,18,lEE 
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270 DATA 
280 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
3BÛ DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
4B0 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 
S50 DATA 
5B0 DATA 
570 DATA 
580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
6S0 DATA 
660 DATA 
670 DATA 
6B0 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 
740 DATA 
750 DATA 
760 DATA 
770 DATA 
7B0 DATA 
790 DATA 
800 DATA 
B10 DATA 
820 DATA 
B30 DATA 
840 DATA 
850 DATA 



lAA.lA.iEO, 8,0,10, 1E0,12, 122,144, 14 
8,40.10, 10, lEQ,tA,lEE,lAA,iA,lEO, 10 
10, 1E0. 1A, 1AA, 1EE. 12, 1E0, 10,10,10 
14,10,10,14,10,10,10,10,8,2,10 
10,12,120.140,1,0,10,12,8,44,168,14 
120, 10,10, 10, 10, 1EE, 10. 1E, 10, 10 
8,0,10, 18, 144,122,14, 180,10, 10, 1E0 
1A, 122,144, 10. 140, 10. 10. 160, IB.IÈD 
lflB,18,160,lO,iÛ,140,lA,tAA,lEE,iA 
lAO.tÛ.lO.lCO.lA.lCCUA.lA.lCO.lO 
10, 1E0.1A. 188, 188, 1A, lEQ.lQ, 10, ICO 
1A, 1AA, 1AA, 1A, 1CO,10, 10, 1EÛ.18.1CC 
186,8,B,1E0, 10,10, 1E0, 18, ICC, 188,18 
180,10, 10, 1E0, 18,188, IAA.1A.4E0, 10 
10, lAQ,tA,lEE,lAA,i,A,iAO, 10,10, 1E0 
14,144, 8,44, 14, 1E0.10, 10,120, 12.122 
lAA.lA.iEO, 10,10, 1A0.1A, ICC, 1AA.1A 
1A0.10, 10, 180, 16,188, 188,18, 1E0, 10 



10,1AO. 
1A.1AA, 
1AA.1A 
180,10. 
10.1EO 
1B.1EE. 
144.14 
1E0.10 
10.1A0 
1A,144 
8,44,14 



1E.1AA. 
1AA.1A, 
1EÛ.1Û. 
lO.tEO. 
1A.1AA. 
8,22,12, 
140,10 
1D.1A0. 
U.1AA 
144, 1A. 
140,10 



1AA.1A. 
!AÛ,10, 
10.1EO. 
1A.1AA. 
1CC.1A 
1E0.1Û. 
10,1AO 
1A,1AA 
1AA,1£ 
1A0.10 
10,1EO 



1AO,10,10,1EO 
10,1E0,1A,1AA 
1A,1AA,1EE,18 
1AA,1E,1EQ,12Q 
1A0,1Û,10,1E0 
10,IEO,14,144 
,1A,1AA,1AA,8.A 
8,-AA, 14, 8,40,10 
1AÛ,10,10,1AO 
10,S,AQ,1A,1AA 
12,144,144,18 



lEO,lû,tO,tEO,ia,lSB,i88,lB,lEQ,!iO 
10, 1B0, 18. 144, 144. 12, 120,10, 10. 1E0 
8.2,122, 8,22, 12, 1E0. 10, 10, 140, lE.tEE 
144,14,140,10.10,10,10,10,10,10 
10, 1F0, 10, 140, 12,10, 8,0,10.10,10 
10,10, tE.122,lEE,lA,tEQ, 10,10, 180 
1U,1EE ( 1AA,1A,1E0, 10, 1U, 8,0.1k, 1BB 
lBB,iB,lEO,10,10,120,12,tEE.lAA.lA 
lEO,10,10.tO,lE,tAA,lEE,tB,lEO,10 
10,160, 18, ICC, 188,18, 180, 10, 10, 10 
!E,tAA,lAA,tE, 120, 1E0, 10,180, 18, IEE 
1AA,1A,1AÛ, 10, 10, 140, 10,144, 144.14 
140, 10,10, 120, 10, 122.122, 8,2, lAO.iEO 
10.160, 18. 1AA.1CC.1A.1A0, 10,10,140 
14, 144, 144. 14, 120.10, 10, 10, 1A.1EE 
1AA,1A, 1A0, 10, 10,10, ICtAA.fcAA.lA 
1A0, 10,10.10, lE.lAA.tAA.lA.lEO, 10 
10, 10, 1E, 1AA, 1AA, 1E, 180,180. 10,10 
1E,1AA,8,AA,1E, 120, 130,10,10,16, 188 
1B8, 18,180, 1Q.10. 10, 1E. 188, 1£E. 12 
1E0.10, 10,140, 1E.144, 144.14, 160, 10 
10,iO,tA,lAA,lAA,tA.tEO,10.10,10 
1A,1AA.1AA,U, 140,10, 10,10, 1A.1AA 
1AA,IE,1A0,10, 10,10, 1A.IAA, 144, 1A 
lAÛ,i0,iQ,tO,lA,lAA,tAA,i,E.12O,lE0 
10. 10. 1E, 122, 144,18, 1Ë0, 10, 10.160 
14,188,144,14,160,10,10,140,14,144 
144, 14, 140, 10. 10, ICO, 8,4,122, 144, 14 
ICO. 8,0, 10.150, 1A. 8,0.10, 10,10, 10 
10.10 



530 DATA 168,t4C,iF£. 



17D,iBE,18C. 198, 140,196, 113 



FORMAT DA2 



10 ' DATAS du prograne FORMAT. B 12 
20 ' ICI 19B9 AMSTAR 1 CPC 
30 ' ET STEPHANE SA1HT-HARTIN 
40 ' 

SO FOR ]=fcZFEA TÛ 139A9;READ A»:PQKE I.ÏAL(A*)iHEÏT 1 
70 SAVE"!FÛRHAT.BI2",B,t2FEA,igBF 
90 DATA 1F3, 121, 10.130, 111, 1A9, 19, 13E,t45,tAE 
100 DATA l?7,t23,lLB,i7A,tB3,tFE,t0,12O,lF4,tC3 
110 DATA 156.139,186, tAE.t4.ii86, 175,17, 186, 11E 
120 DATA 17,186.129,17,186,138,17,186,184,17 
130 DATA 186,180,17, 186,1AQ, 14,186, 181, 14,186 
140 DATA 14, 16, 186. 14.16.186.164,11,186.102 
150 DATA 14. 1B6, 173, 14,186, 12E. 15, 145, 151,110 
160 DATA 1BA,145, 146, 11D, 147,145,146, 110.147,145 
170 DATA 146, 110,147,145, 146, 11D, 147, 145;146,tlD 
180 DATA 147,145,146,110,147.145.146.110,147,145 
190 DATA 146, 110,147,145, 146,110,147, 145, 140, 11D 
200 DATA 190,198,164,141,14.148,145.143,147.188 
210 DATA t9D,ll.lBB,lB9,18F,145,14.1BB,175,t7D 
220 DATA IBLIBB, 17F, 175,147. 1SD, 156, 1A3,19A,1BB 
230 DATA 14, 19F. 131. 15. 1BB. 12,197, 131, i5,l8B 
240 DATA tlF,lFE,183,14C,15D.146,18B.llF.lFE,tA3 
250 DATA 14A. 198. 132.145, 198.-166, 155, 18A, 149,130 
260 DATA lBB,14F,16D,15D,17B,16A,i88.1!F,lFE,186 
270 DATA lC4.tFE,188.14C.iFE.l75,lBE,186,tCl.lFE 
2B0 DATA lBB,148.t6D,141,143.t47,t5D,lFl,t3C,! 1 E2 
290 DATA 1BF, 144,14,12, 177,12F, 15, 198,164,141 
300 DATA 14,164, 155, 10, 180, 1A0, 188, 1A4, 15, 1A4 
310 DATA 184, 155, 1B2, 178,144,186,144, 14. 164, 145 
320 DATA 145,111,143, 147. 19B.13B, 145.188,180.15 
330 DATA 198, 166, 155, tB3,tl8.1B4, 1A4, 136.166. 1A0 
340 DATA lB0,i8C.16C.141,llD,llA.15C.16C.lEA,194 
350 DATA 157, tBC,145,177,tlD, 154, 155,10, 143, 145 
360 DATA 188, 19D, 11, 1BB.13A, 165, 140,186. 12E. 14 
370 DATA 15D,1B1,1BB, 148,180,157, 180. 190, 188, 116 
380 DATA 1FE. 194, 184,156, 141. 13D. 177, 12F, 15, 1BB 
390 DATA t5C,17D,t9A,188,i5D,lFE,lBB,148,t8D,lBB 
400 DATA 13A.165,lB3,lB9,12E.i4.15D,195,t3D.lE2 
410 DATA 18D,140,t3D,t77,t2F,t5,i5E, 178,165.157 
420 DATA 17B,14D,tBB,llF,lFE,17a, 165, 188,11F, 1FE 
430 DATA t7B,14D,t88.11F.tFE, 180,186.190, 164, 16F 
440 DATA 10,144.145. 147, 1A0. 154,155, 10,178,145 
450 DATA 180, 17F, 12F, 15,12, 14B, 145. 15F. 1D3.1F4 
460 DATA !A,l56,166,!55,tBD.i84.1A4.18F,tFl.t4 
470 DATA 14E,13C,1F5,166.165.1A5,1BE.1EA,194.157 
480 DATA 18C,lBE.17B,144,19a.t57,19B,llB.147.t9B 
490 DATA 113.146.1AE. 136, 166, 137,180, 17B, 144, 198 
500 DATA !AÛ.t9A.i41. 10, 198, lA4.t98,t2B, 145,198 
510 DATA 123,144. 132, 17B,145.198.1AÛ. 19A, 141. 1Ô 
520 DATA 196. 1A4, 19B,12B.lû?, 138, 123. 146, 132,180 



540 DATA 147, 196,11F. 
550 DATA 198,i3B,145,S 
560 DATA 145,196,166,! 
570 DATA 166,198, 166, ( 
580 DATA 1A4,198,13B,( 
590 DATA 15D,147,17B,1 
600 DATA 1A4,19A,1BD,1 



3,12B, 143,198,123, 142 
3 , 12, 198, 164,17, 15,198,137 

3,166,133.198,132,145.198 
5,166, 155, 1AB, 164, 17,15,198 
3, 145,1BB.14C. 160,141, 176,144 
3, 184, 1AO,190,19A, 144, 10,194 
), 11,186, 190, 17B,tBA,19A.lA3 
610 DATA M, 198, 118,141,198, 113, 147, 19A,IA9, 11 
620 DATA 164, 168,15, 1A0,19A,1AA, 11, 1A4, 175, 14E 
630 DATA 17F,114,lFB,132,166,13B.iBB,tBA,165,lAA 
640 DATA 1EA, 194.157, 1EA,19A.1A3, 11. lôC.tE. 198 
650 DATA 118,141,198, 126,143,198.123,142, 198, 113 
660 DATA 147.19A, 1B7, il. 18C.1E. 198,118.141,198 
670 DATA 128,143, 198, 123, 142, 198, 113, 147 ( 19A,1B0 
680 DATA il, 18C, 178, 198.t66, 198, 166, 12, 180,198 
690 DATA 1A0, 188, i4C,iFE,i7D,kBE,tB0, 180, 188,104 
700 DATA lFE,144,iED.124.14E,13D.lF4,165.1BE,188 
710 DATA tCl.iFE,t44,18D,lEA,14E,13D.lF4,165.tBE 
720 DATA 184,184,188, 14C.1FE, 175, 1A4.1A3, 19A.19B 
730 DATA 1FB, 145, 16D,14E, 188, 166,198, 166.155,180 
740 DATA 198.1A4.1B4, 150,163,157, 198. 1A4,1B4.18C 
750 DATA 188, 15E, 1FE, 195,186, 150. 1FE,18C,1BB. 147 
760 DATA 160, 157, 178,165,186, 11F, 1FE,17B, 165, 188 
770 DATA ilF,lFE,i6F,12D,15,lBa,166,16,lSD,14F 
780 DATA 198,128.147,196.123,146, 188.166,16, 1AE 
790 DATA 143,147,i7B,165,t68,ilF,tFE,l55,lBE.t43 
800 DATA 155. 13B,188,16D,16,17B, 165,188, 11F, 1FE 
810 DATA 166,155, 1B1, 143,147,178, 165,188, 11F, 1FE 
820 DATA 155,lBE,lEA,154,i55,145,lA8,117,143,155 
830 DATA 13B,iBB,lC5,17D,t47,17B,16B,lA0, 180,188 
840 DATA 118,iFE,184,lA4,166,155,lAA,taC,139,t88 
850 DATA 16D,16,i38,lB0,lBE,14A,18E,14A,iaE,14A 
860 DATA i8E,i4A,tB8,170,t6,lB4,lA3,t4A, 183,105 
B70 DATA 162, 1BB,15,162, 186,11F, iFE,iBC,13E, 177 
860 DATA 149, 10, 153,144, 190, 19A.1A9, il, 17B.1BA 
890 DATA 19A.lA3,ll,19A,iAA,ll,17B.i45.19A.lA3 
900 DATA 11, 17F,114,lFB,lBB,i4F,17D, 173,188.151 
910 DATA i7D,149,!BB.i5B,i7D,!4A,!BB,tF,17D,t6B 
920 DATA tBB,18F,15D,16B,i7B,14F,î,54,iE2,lg,!.5D 
930 DATA 140,178,151,164,185,16,177,168,15,194 
940 DATA lA0,i6F.t7,iFB.t7F.t4g,10.iE2,t6D.i41 
950 DATA 144, 15,145, 14C,1AE,1A4, 144. 15C, 145, 1A8 
960 DATA lF5,l8C,17B,144,t5D,t43,17B,14,15D.i47 
970 DATA 178, 184,177,168, 15,194, 19A, 144, 10,180 
980 DATA 16D. 145, 146,142, 145, 1BE, 145, 174,145.185 
990 DATA 145, 155,145,144, 145, 14F, 14F, 165, 177, 1AÛ 
1000 DATA 147. 141. 145, 145. IBA.16D, 145, 146. 142, 145 
1010 DATA 194, 145, 17A, 145,185, 145,155, 145, 146, 11D 
1020 DATA 151,14P,165,177,lA0,147,141,145,i45.lBA 
103O DATA 145, 148, 11D.14A, 146, 14F, 14F, 148, 165, 116 
1040 DATA 120,129.t20,t26,i31.12C,t2A,i2B,i65,tlO 
1050 DATA 116,10, 117, 165, 165,175, 168,174,170, 17F 
1060 DATA 165,t65,i4A,144,iBA,i4A,i46,149.14F,t4F 
1070 DATA 165, 110,136, 120,137, 165,126, 12A. 130, 137 
1080 DATA 124, 12B. 131, 165, 178.165. 14A. 144. 1BA.145 
1090 DATA 146, llD,164,15B,il.l43,i46,iEA, 132.155 
1100 DATA 188.164, 143, 11, 18B,1E6, 11, 17F, 148,10 
1110 DATA i2A,t63,145,168,lE8,tl.l64,iA3,i6,lB8 



1120 DATA 1E6.11, 164, 158,11. 14B.145, 188. 190,11 
1130 DATA 188, HF.IFE.IBB, 146, 16D.14D, 132, 166,149 
1140 DATA 13C,lBB.147,i65,lAB,13C,lBB,t47,16D,14D 
1150 DATA 154, 145, 145, 164, 15B. 11. ISD.14B. 154,145 
1 160 DATA t45,164.i5B.ll,136.1E2,t8D,lBB,lDl,ll 
1170 DATA 11A, 166, 13B,1E2,16F,13E, 11.188, 101,11 
1180 DATA 116,11A,1EA, 143, 14F. 107,155, 188, 1C6.1BB 
1190 DATA 155, 197, 164, 11, 177,148, 10. 17B, 144. 198 
1200 DATA 164, 148, 10, 19A, 142, 10,180, 1BB, 175. 17D 
1210 DATA 142,1BB,17F,175,146,1A3,14A.1BC,1A4.186 
1220 DATA 164.il,13B,lBB,lBA,18D,188,llF,lFE,166 
1230 DATA 15D.IB3.14B, 175,143,147,198, 164,191, 11 
1240 DATA 198.118,145,198,166,198,113,145,198,166 
1250 DATA 1EA,1A8, 117, 170,146, 179, 15D,1BC,15C,1F2 
1260 DATA 16D,147,t4B,175,iF4,188,llF,lFE,i55,lA7 
1270 DATA 16C,i4F,145,144,l45,lBB,14C,lFE,17D,lB£ 
1280 DATA 188.1C4.1FE.188.15D,1FE,1B6.1C1,1FE,137 
1290 DATA 18F, 142, 146, 163,142,126,182, 142,129,180 
1300 DATA 142.123,183.142,18.183.142,117,183,142 
1310 DATA 19F, tB8,142,t9B,188,142, 104,180,142, 175 
1320 DATA 183, 142, 1BB, 186.142,145, IBA,11D, 145, 1BA 
1330 DATA llD,145,lBA,ltD,145,iBA,tlD,145,lBA,llD 
1340 DATA !45.1BA.ilD.145.1BA,llD,!45,lBA, 110,145 
1350 DATA lBA,llD,145.1BA.tlD,145,lBA,llD,145,iEA 
1360 DATA llD,145,lBA,llD,145,18A,AlD,145,lBA,tiD 
1370 DATA 145, tBA.!lD,145,lBA,HD, 145, tBA, 110,145 
1380 DATA !BA,HD,!45,lBA.!lÛ,145,tBA,llD,145,lBÂ 
1390 DATA 11D,145,1BA,11D,14S,1BA,11D,145,1BA,11D 
1400 DATA t45.1BA.tlD,145,lBA.llD,145,154.11D,lB6 
1410 DATA 13C, 125, 145, 145, 14F, 147,145.145, 14A, 147 
1420 DATA 145. 145, 14E, 147,145, 145, 155, 147, 145. 145 
1430 DATA 149,147,145,145,154,147,145,145,148,147 
1440 DATA 145, 145,157, 147. 145, 145, 14B, 147, 145, 145 
1450 DATA 156,147,145,145,151,147,145.145,150,147 
1460 DATA 145.145.150,147. 145, 145. 15F, 147,145,145 
1470 DATA 153, 147, 145, 145, 15E, 147,145,145, 152,147 
1480 DATA 145,145, 159, 147, 145, !45>5D. 147. 145, 145 
1490 DATA 158,147,145,141,110,184,147,145,145,187 
1500 DATA 147,145.145,186,147,145,145,161,147,145 
1510 DATA 145.180,147,145,145, 183, 147, 145, 145, 162 
1520 DATA 147,145,145,160, 147, 145, 145,180, 147, 13E 
1530 DATA 177,1A6,124,1EA,177,116,125,198,13B,147 
1540 DATA 11A.177. 111,125.188.117. 124, 17F. 1A6, 124 
1550 DATA 1E2, 165, 14C, 198,164.146,125,164, 146, 125 
1560 DATA 15D, 142,198, 164, 16E. 125, 164. 16E. 125, 17F 
1570 DATA 116. 125, 112, 143,14F, 198, 137, 145, 198. 166 
1580 DATA 198. 166, 198,166, tSB, ISS, 155,136, 17F, 111 
1590 DATA 125, UA, 190, 19A,1EB, 124,194,13F, 173, 1BB 
1600 DATA 16F.177, 116. 125. 165,160, 190, 17F, 111, 125 
1610 DATA 1E2.16D,143,1EA,19A,1EE,124,15D,141,1EA 
1620 DATA l3A,lED,i24,i43,14E,!64,lF2,124,!54,lEA 
1630 DATA 120, 188. 1C9.1F9, 164. 1AB. 121. 154, 180,145 
1640 DATA 17B.144.1B8.1DD,1F9.1BB,1CA.1F9.143,14E 
16S0 DATA t64,187,t24,i54,lEA,120,l68,lC9,lF9,i64 
1660 DATA 1AB, 120, 154, 1BD. 145,178.144.160. 1DD.1F9 
1670 DATA !86,1CA,!F9,!94,17F,1A6,124,1E2,!85,17B 
1680 DATA t84,19A,lFl,124,17F,tll,125,llA, 153,145 
1690 DATA 164,llÛ,125,19A,lEB,124,t43,14E.t64.1B6 
1700 DATA 124, 154.1EA, 120,188,109, IFS, 164.145. 127 
80 



1710 DATA 154, 14F, 144,178,144,188, 1DD,IF9, 168, ICA 
1720 DATA 1F9, 143, 14E, 164,190, 124,154, 1EA, 120,188 
1730 DATA lC9,lF9,164,16F t 126, 154, 14F, 144,176,144 
1740 DATA i88,lDD,iF9,186,lCA.lF9,lAB,liE,17.tFB 
1750 DATA 17F,lll,125,lE2,16D,143,144,15,t45,lAE 
1760 DATA 14C,iAE.17F,lA6.124,lE2,t65,14û,164,133 
1770 DATA 124,150,146,164, ICA, 124,144, 150,145, 1A8 
1780 DATA 1F5.18C. 160.145,146, 142. 145, 18E. 145, 17A 
1790 DATA 145,185, 145,155, 145, 144,145, 14F, 14F, 165 
1800 DATA 177, 1AQ, 147, 141,145, 145, IBA.16D. 145, 146 
1810 DATA 142, 145,194, 145, 17A.145, 165,145,155, 145 
1820 DATA 146, 11D. 151, 14F, 165,177, 1A0, 147, 141, 145 
1830 DATA 145, ISA, 19F, 188,142.198, 188, 142, 117, 183 
1840 DATA 142, 126. 182,142,104, 180, 142, 1B.1A.117 
1850 DATA 18,14,19, 14, 16B, 17, 1C,1B,1B,1A 
1860 DATA 117,18,14,19,17,166,17,10,18,11 
1870 DATA 1C,117,14,165,146,11D,16B,17,1C,1B 
1680 DATA 11. 10,117. 17, 165, 146, lLD,16B T 17,fcC 
1B90 DATA 1B, 145, 158, UD, 12,145, 14F. 145. 1DB, 165 
1900 DATA 148, 145.145.1A3, 1AA. 159, 145,144,165, 1A9 
1910 DATA 165, 159, 145, 144, 1B1, 150,160, 144, 186, 165 
1920 DATA 146. 145. 145, 1A4, 144, 148,145, 145, 1A4,1AA 
1930 DATA lBA,15B,t6D,t67, 163, 167, 181,146,145, 145 
1940 DATA tA* l 16C,144,lFB,165,148,145,145,tA3,l69 
1950 DATA 148, 145, 145, 1A4,144,1F5, 144, 106,165, 159 
1960 DATA 145, 144, 144, 1F4, 145, 123.145.151,145,109 
1970 DATA 165,120.121,169,170,127,169.171,177,169 
1960 DATA 127.120.169.177,174,169.175,121,169,174 
1990 DATA 169,174.169,174,170,169,175,169,120,121 
2000 DATA 169. 127, 175, 169, 126, 170,169, 177, 17D, 169 
2010 DATA 175,169,176,169,172,169,175,169,126,127 
2020 DATA 169,175.169,176.123,169,175,169,126,175 
2030 DATA 169,176.169,174,175,169,175,169,174,169 
2040 DATA 175,169,124,169,124,169.177,175,169,176 
2050 DATA 177,169,120,170,169,177,169,171,169.175 
2060 DATA 169,175.169,123, 123, 145,13A,11D, 12. 145 
2070 DATA 14F, 145, 1DB, 165, 146,145.145, 1A3.1AA, 159 
2060 DATA 145. 144,165,1A9, 165,159,145, 144, 1B1.15C 
2090 DATA 160,144,186, 165,146.145, 145, 1A4, 144, 14B 
2100 DATA 145, 145, 1A4,1AA,1BA, 158, 160,167. 163.167 
2110 DATA lBl,t46,145,145,lA4,i6C,144,lFB.165,t48 
2120 DATA 145,145,1A3, 169,148,145, 145, 1A4, 144, 1F5 
2130 DATA 144,106, 165, 159,145, 144, 144, 1F4, 145, 12A 
2140 DATA 145,151.145.109,165,177,124.169,171,177 
2150 DATA 169,127,120,169,174,169,171,175,169,175 
2160 DATA 169.170.169.174.174,169,174,174,169,174 
2170 DATA 169, 120, 127-.169, 174, 169, 174,170, 169. 175 
2180 DATA 169.120.121.169.127,175,169,126,170,169 
2190 DATA 177,170,169,175,169,176,169,172,169,175 
2200 DATA 169.126,127,169,175,169,176,123,169,175 
2210 DATA 169,126,175,169,175,169.174.175,169,175 
2220 DATA 169.174,169,175,169,124,169,124,169.177 
2230 DATA 175,169,176,177,169.120.170,169,177,169 
2240 DATA 171,169,175,169,175.169,123,123,145,16.1 
2250 DATA 11D, 145, 154, 11D.170, 145,14F, 145, IDE, 165 
2260 DATA 148.145.145,lA3,lAA.159,145,144,165.tA9 
2270 DATA 165. 159,145, 144.181,150, 14F, 144,186,165 
2280 DATA 146, 145,145,1A4, 144, 1FB. 165, 148, 145,145 
2290 DATA lA3,169,tBA.158,16D.167.163,167.1Bl,14G 



2300 DATA 
2310 DATA 
2320 DATA 
2330 DATA 
2340 DATA 
2350 DATA 
2360 DATA 
2370 DATA 
2380 DATA 
2390 DATA 
2400 DATA 
2410 DATA 
2420 DATA 
2430 DATA 
2440 DATA 
2450 DATA 
2460 DATA 
2470 DATA 
2480 DATA 
2490 DATA 
2500 DATA 
2510 DATA 
2520 DATA 
2530 DATA 
2540 DATA 
2550 DATA 
2560 DATA 
2570 DATA 
2560 DATA 



445,645,6A4,66C,644,6F5,645,64F,645,651 
ic4S , bCe , &6S , LBQ , !<45 , &44 . &45 , &G2. &4S , &5B 

445,409,665.676,620,669,626,474,469.474 
620, 669, 175. 1,75. &S9, &21 , &23, bG9, &7S , &7D 

669, 475. 674,469, 626. 67C, 669, 470,674,469 
626, 670,669, 475,672,645, 6DE.61D, 470, 645 
64F, &4S, 6DB. 8,65. 146. 645.445, &A3, &AA.&5S 
645, 444,665,6A9, 665,659,645, 644,681, 65C 
64F.444, 686.465.446. 645, 645, 4A4, 644. 4FB 
465, 648, 645, 8,45, Ê.A3,669,!<BA,6Sa,46D.S:&7 
663, 467, 661,646,445, 645, 6A4.66C, 644, 4F5 
445, 64F, 645, 45 1, 445, 6C6, 465, 459, 445, 444 
645, 662. 645,65B,445,6C9, 465, 476, 620,469 
426,674,669,674,620,469,675,674,469,621 
623. 669.675,67D, 669, 675.474.669, 626,476 
669, 67D.674, 669, 626,670,669, 675,472.445 
668, 610.667.64,66,616, 611,44,617,665 
663, 665.46, 415, 66.645, 610,610, 66D. 66 
66C, 665,674,67C, 47D, 67C, 665, 69,462, 6C 
6B,66.4A,6B,6B, 610,465.664, 641, 41D 
645. 645. 68C. 645, 6B6, 664,623,476, 654,65 
645. 644,645, 644. 690, 6A8,6F5,6BC, 498, 664 
612. 67C.664.6B9, 623, 654, 4BA.47A, 696,638 
645,6BB,6tD,665,667,698,63B,6BA,6BB,647 
660,651. 690, 6A, 643,645.411, 618, 45E,698 
63B, 6BB.432, 4A8, 6FD, 698,66F, 696, 66E, 694 
45D.649, 698, 63B, 445, 698. 4GE.45D. 646,698 
638,645,632, 66E, 698, 66E,439,4FF, 665,689 
638.6FE,665,68D.48C.60 

GESTION 



10 ' GESTION DU MODE 178-202 >LA 

20 ' (C) 1989 "AHSTAR 6 CPC" >L8 

30 ' Et "Stéphane Saint-Martin" >LC 

40 ' le caractereXs'obtient avec control X >LD > 

50 KEY DEF 66, 0.0,0. 0:PQKE 48622, 201:HODE 2:PAPER 0:PEN >GP 
1:!NK 0,0:BORDER 0:lNK 1,26:SPEED KEY 7,7:P0KE 6A701.0 
:GGSUB 280:PÛ=1:A1=1:G0SUB 340 

60 A2$=INKEY$:IF A2t="THEN 60 )Ifl 

70 IF ASC(A2*)=242 THEN Di=-1:G0TQ 240 >DL 

80 IF ASCU2*)=243 THEN Dl=t:GOTQ 240 >CH 

90 IF ASC(A2$)=13 THEN 110 )TG 

100 GOTO 60 >8D 

110 ON PO GOSUB 440, 460, 480. 500, 510:1F P0=4 THEN GOSUB >JL 
570:GQTQ 60 

120 A3*=iNKEYt:IF A3$=""THEN 120 >ÏI 

130 IF ASC(A3*)=13 AND P=l THEN ON PO GOSUB 520.530,540 >EB 
,550,560 

140 IF ASC(A3*)=13 AND P=l THEN 60 >ÏY 

150 IF ASCIA3I)=240 AND P=l THEN 120 >AH 

160 IF ASC(A3»)=241 AND P=RO(PO)THEN 120 >FA 

170 IF ASC<A3t>=240 THEN GOSUB 660 >AF 

180 IF ASC(A3Ï)=241 THEN GOSUB 630 >AE 

190 IF ASC(A3*1=13 AND P0=2 THEN ON P-l GOSUB 690,700 >TA 

200 IF ASC(A3*)=13 AND P0=1 THEN ON P-l GOSUB 790,810 )TU 

210 IF ÂSClA3ti=13 AND P0=3 THEN ON P-l GOSUB 740,770 >TÏ 

220 IF ASCI A3») -13 AND P0=5 THEN GOSUB BSO ;GB 

230 GDTO 120 >ÏE 



;■£■: 



240 AJ=PO:IE Dl=-[ AND P0=1 THEN 60 >ZY 

250 IF Dl=l AND PO-5 THEN 60 >TH 

260 IF Dl=t THEN P0=PO+t ELSE P0=P0-1 )C£ 

270 ON Al GOSUB 390.400, 410, 420, 430:0N PO GOSUB 340,350 )VÏ 
,360,370.380:GOTO 60 

280 CLS:LOCATE 25, 1:PH1NT" ";STRING*(31.32I :LOCATE 25.2 >WU 
:PRINT" XGESTION DU MODE 178-202 X":LOCATE 25,3:PRI 
NT STRING»(3i,32);" "lLDCATE 1.5:F0R 1=30 TO STEP-1:0 
UT 6BC00.7:OUT 48D00. 1 .-CALL 68Dl9;NEÏT:F0fi 1=0 TO 35:0U 
T 6BC0O,7:OUT 6BDOO,I:CALL 6BD19 

290 NEXT:PHINT" ";CHR*(150);STRING»<12,154) ;CHR)U58>;S >HH 
THING»U3,154);CHR*(158);STRlNGt(19.154);CHR»{15B);STRI 
NG»[15,1541;CHH»(158];STRINGI113.154);CHHI(156) 
300 PRINT" ";CHR»(149);" HQDE 178 ";CHR»<1491 ;" GATA >JH 
LOGUE ";CHR»(149);" EFFACER FICHIER ";CHR»(1491;" C 
HANGER NON ï'fCUBKMa) ;" «COPIEUR* "jCHRl(149) 
310 PKIHT" \CHSÎ(147];STRiNGt;i2,i54;;CHRÎ(iSBi;STHING >KB 
*(13,154};CHR$(155);STH1NG»(19,154);CHR*(15S>;STRINGÏ(1 
5,154):CHR*(155):STRING$(13,154);CHRK153):S0UND 1,100, 
5,12:DIH Ht(5,4):T(l(=4:T{2)=17:T(3)=31:T(4)=0:T{51=66: 
RESTQRE 33O:F0R ï=l TO 5 

320 FOR ï=l TO 4:READ Rl(X,Y):NEÏT:NEXT:Rt{3,3)=R»(3,3) >ÏF 
*STR*(PEEK(6A701)) 

330 DATA" HODE 178", -«ode 176,-iotie 202,," CATALOGUE",- >FH 
catalogue, -run pg>,," EFFACER FICHIER", -effacer fichier 
,-User No,." CHANGER NOM",,,," «COPIEUR» ".-vers 178 
Ko, -vers 202 Ko, 

340 LOCATE 4,6:PRINT"I";R$(1,1);"J' , ;RETURN >LU 

350 LDCATE 17,6:PRINT"X";R*<2, 1) ; ! 
360 LOCATE 31,6 :P8INT*X!";H1 (3,1) j 1 
370 LOCATE 51,6:PRINT"£ l ';R»i4, 1) ; ' 
380 LOCATE 66,6:PR!NTT';RJ(5,1) ;' 
390 LOCATE 4,6;PRINT H*Cl,lî ;■ 
400 LOCATE 17,6:PRINT R»(2,l); 
410 LOCATE 31.6:PRI(JT R*(3.t);" " 
420 LOCATE 51,6:PRINT H»(4,l);' 
430 LOCATE 66,6:PR1NT R*(5.1);' 
440 RO(l)=3:P=l:L0CATE 2,7;PRINT CHRt(149) ;ST81NG*(12,3 >EU 
2);CHH»(1511:F0R A=8 TO 9:L0CATE 2,A:PRINT CHE*(149);ST 
RING»<12,32);CHB»<H9):NEXT:L0CATE 2,10:PRINT CHRH147) 
;STRINGI(12,154)!CHRK153];L0CATE 4,8:PRINT"-iode 178"; 
LOCATE 4,9:PRlNT"-«ode 202" 

450 RETURN )ZE 

460 B0C2»=3:P=1:L0CATE 15,7:PRINT CHR*<157) ;STRING*(13, >AA 
32>;CHR»il51):F0R A=8 TD 9:L0CATE 15,A:PRINT CHRt{1491; 
STRINGJ(13,32);CHRÏ(149]:NEXT:L0CATE 15,10:PRINT CHRïd 
47>;STRINGï(t3,154i;CHR*(153):L0CATE 17,8:PRINT n -catalo 
gue":LÛCATE 17,â;PRINT"-run pgi" 

470 RETURN >ZG 

480 R0(3)=3:P=1:LGCATE 29.7;PR1NT CHR»(1S7) ;STR]NG»(19, >QH 
321;CHR1(151):F0R A=8 TO 9:L0CATE 29,A:PSINT CHRK149); 
STRING»(19,32);CHR»(149):NEXT:L0CATE 29,10:PRINT CHRK1 
47) ;STRING*(19. 154) :CHRt( 153 ); LOCATE 31,8:PRINT"-efface 
r fichier":LDCATE 31,9 

490 PRINT"-User Na"iPEEK(4A701):RETURN >LQ 

500 RO 141^0: RETURN >ND 

510 R0(5 ) =3 iP=i: LOCATE 65,7:PRINT CHRÏU57) ;STRINGt(13, >ZH 
32);CHR»(149):FQR A=8 TO 9:L0CATE 65,A:P8INT CHRIU49); 
STRING*(13,32);CHRt<149);NEXT:LÛCATE 65,10;PRINT CHBïfl 

81 



/: RETURN 
.": RETURN 
; n :RETURN 
1" : RETURN 

': RETURN 
": RETURN 
"; RETURN 
'; RETURN 
': RETURN 



>GQ 



47);STRINGt(13,154);CHRïU53):FQR A=8 TQ 10:LOCATE 66, A 

:PHINT RS(5.A-6):NEÏT 

520 FOH A=U TO 8 STEP1 :LQCATE 2.A:PRINT STRINGIU4.32 >EU 

):NEKT:LOCATE 2,7:PRINT CHR*(U7);STBINGt(12. 154) ;CHK*l 

155):RETUHN 

530 FOR A=10 Tu B STEP-1;L0CATE 15.A:PR1NT STR1NGM15.3 >JH 

2):NEXT:LQCATE 15.7:PRINT CHR*(155) ;STR1NGÏ<13, 154);CHR 

t< 155): RETURN 

540 FOR A=10 TO B STEP- 1 :LDCATE 29.A:PRINT STRINGK21.3 >JC 

2):NEXT:L0CATE 29.7:PRINT CHR»(1551 :STRINGI(19,154) ;CHK 

Ï(155):RETURN 

550 RETURN >7-F 

560 FOR A=ll TQ B STEP- 1 :LDCATE 65.A:PR1NT STRINGt(15,3 >JA 

2):NEXT:L0CATE 65,7:PRINT CHEK155) ;STRINGI<13,154) ;CHR 

»I153):RETURN 

570 SPEED KEY 30.2:L0CATE 1. 13: INPUT'ANCIEN NOM : ",A0 >YN 

lilF AOI=""THEN 620 

5B0 IF LEN(A0»K5 DR LEN(AQ*I>12 THEN LQCATE 1.13:PR1NT >DJ 

STRING1140,32):G0TD 570 
590 LOCATE I. 15: INPUT'NOUVEAU NOM : ".NO*: IF NO*=""THEN >ER 

620 
600 IF LEN(N0»K5 OR LENIN0SD12 THEN LQCATE 1.15:PRINT >DJ 

STRINGtf40.32):GOTO 590 
610 LOCATE 17. 23; FR1KT" Appuyez sur une t-eâefà pouf U -M 

■odificatlon... ":CALL &BB18:ùREN,àNOï,àAÛ*:S0UND 1,1 

00,5,12 

620 YINDOUt2.1,B0.11,25:PAPERI2.Q:CLSt2:UINDQ u l2,l,BO,l >HÏ 

,25: SPEED KEY 7, 7: RETURN 

630 P=P*1:IF P=2 THEN LQCATE T(P0),6:PRINT RIlPQ.l);" " >JX 

:GOT0 650 

640 LOCATE T(PO) ,Pt5:PR!NT Rt(PO.P-t) >EZ 

650 LOCATE T( PO) , P+6: PR I NT"X" ; Rt ( PU. P ) : "^" : RETURN >UU 

660 IF PO-5 THEN EI^CHR((149)ELSE Eï=" " >FR 

670 P=P-1:IF P=l THEN LQCATE T(P0)-1,8:PRINT E*;R*IP0,2 >BR 

);" VLOCATE T(P0).Pt5:PRINT"X";RHPO,P) :"X":RETU8N 

680 LOCATE T(PÛ) ,P+7 : PEINT Rt<PO,P*t) :L0CATE T(P0).P+6: >PZ 

P R[ NT"X" ; R* ( PO, P ) ; "X" = RETUfiH 

690 IF Pû=2 THEN LQCATE 1.11:CAT:LQCATE 10.24:PRINT"XA )LH 

ppuyez sur une touche ":CALL fcBBlB:GQSUB 620:RETURN 

700 IF P0O2 THEN 740 >NV 

710 SPEED KEY 3O.2:L0CATE 1. 13: INPUT'Noi du Prograwe a >AU 
lancer : ",N1»:1F N1»="THEN GOSUB 620:RETURN 

720 IF LEN(Nltl>12 THEN LOCATE 1.13:PR1NT STRINGK40.32 >GG 

);STRING*t40,32):GOT0 700 

730 SPEED KEY 7,7:LÛCATE 10,23:PRlNT i KADpuyez sur une >HX 

touche"£":CALL i,BB16:RUN Nlt:RETURN 

740 SPEED KEY 30.2:LÛCATE 1, 13: INPUT'Noi du fichier a d >TK 

etruire : -,D0*:1F D0*="THEN LOCATE 1,13:PRINT STRING» 

(40,32) :RETURN 

750 IF LENfD0!)(5 OR LEN(D01))12 THEN LOCATE 1,13:PR1NT )CU 
STRING$(40.32)iSTRINGIUO,32]:G0T0 740 

760 LOCATE 10,23;PH1NT" Appuyez sur une touche"S.":CALL >CB 
tBB18:ùERA,âD0>:SPEED KEÏ 7,7:G0SUB 620:RETURN 

770 LOCATE 1. 13: INPUT'USER Ho : ",lt:IF U<0 OS 11)255 THE >YF 

N GOSUB 620:GDT0 770 

780 PDKE LA701,U:RII3.3)="-User No"tSTRtll)):LÛCATE TlP >LA 

0).9:PRINT" -User No":PEEKIi.A7Qll :"Y":CHRï<B) ;" \GDS 

UB 620:RETURN 

790 RESTORE 800:FDR F=ilQO TO M00+10:READ AI:POKE F, VA >AG 

82 



LCVtA*);N£XT:CALL M0O:LQCATE 5,6:PRINT"M0DE 178":R*( 
1,1)=" HODE 17B";RETURN 

800 DATA 3e,ci,le,00,df,06,ûl,c9,81,c5,D7 >GU 

810 RESTORE 820:FDR F=6100 TO fciOO+37:READ At:A^AL("f >HK 
+A»):P0KE F,A:NEÏT:CALL ilOOiLOCATE 5,6:PR1NT"H0DE 202" 
fl>tl,:l>=* HODE 202":RETURN 

820 DATA ed,5h,42,be ( 21,Od,01,01,19,00,ed,hO,c9,28,00,0 >YH 
3, 07, 00, cb,00,3(, 00, 00,00,10,00,01.00,03,03,20,32.65. 02 
,04,00,00,fl 

B50 SPEED KEY 3O,2:L0CATE 1.12:INPUT" COPIE DE :X".N*: >FC 
IF N»=""THEN LOCATE 1,12:PSINT STR]NG»(40,32);STRINGÏ(4 
0,32):SPEED KEY 7,7:RETURN 

860 L=LEN(N*):1F L)12 OR L<1 THEN LQCATE 1,12:PRINT STR >XB 
lNGI(40,32);STRINGt(40,32):GQTO B50 

B70 SPEED KEY 7,7:SQUND 1,100,5, 12:L0CATE 17,15:PRINT"1?ZH 
Inserez la disquette et appuyez sut une touche -Y^CALL 
fcBB18:L0CATE 1,15;PR!NT STR1NG*(40,32);STRINGÏ14Û,32): 
UiNDOU l.BO.l,23:0N ERROR GQTO 880:OPENIN Ht 
880 RESUHE 690 >VG 

690 LOCATE 1, ISîPRINT'S Intonations sur le fichier :X" >ZE 
:T0^PEEK{l,A767)iD=PEEK((.A76A) + (PEEK{t I A76BHi256):L0=PEEK 
(liA76D) + (PEEK(iA76E)t256):E0^PEEKl!.A76F)HPEEK(tA77O)«2 
56): IF T0=0 THEN H*="BASIC" 

900 IF TO=t THEN H*=*BASLC PROTEGE" >CB 

910 IF T0=2 THEN M*="B]NA1RE" >UU 

920 IF T0=6 THEN H$='ASCH" • >UX 

930 LOCATE 1,17:PRINT"TYPE ";H»:PRINT"D >DH 

EBUT ";D:PRINT"LQNGUEUR ";LO:P 

RI NT' EXECUTION ";EO:RESTOR£ 990:FOR B=59264 T 

59330:READ JÏ:PQKE B.VALCiMJt) :NEXT:F0R H=63360 TD 

63360>LENtH$) 1 

940 POKE H,ASC(HID*(N*.H-63359,1)>:NEXT:P0KE 59268. L:PÛ >DJ 

KE 59302,L:P0KE 59273, PEEK(fcA76A>:P0KE 59274. PEEK (IA76B 

):POKE 59307, PEEKI&A76A) :PQKE 59308, PEEK CtA76B I : POKE 59 

31Q.PEEK{fcA76D):P0KE 59311, PEEKUA76E) :P0KE 59313, PEEKf 

fcA76F):P0KE 59314, PEEK lfcA770) 

950 PQKE 59316, PEEK (&A767) >UC 

960 DATA 21,00,OO.U,00,00,01,26,00,ED,B0 1 C9 >JK 

970 RESTORE 960:FÛR A=5516B TO 55179;READ XÏjPOKE A.UAL >AF 

Cfc"tXt):NEXT:RESTDRE 96O:F0R A=57216 TO 57227:READ XI: 

POKE A.VALIT+XïlîNEXMF P=2 OR P=3 THEN POKE 55170,1 

:POKE 55172, 128:P0KE 55173. 255:P0K£ 57217, 12B:P0KE 5721 

B,255:P0KE 57221,1 

9B0 IF P=4 THEN PQKE 551G9. 128:P0KE 55172, 128:PQKE 5517 )TC 

3,255:P0KE 57217, 128:PÛKE 57218, 255:P0KE 57220,128 

990 DATA 21,80,F7,06,00,CD,77.BC,21,00,QO,CD,B3,BC ( CD,7 >JZ 

A,BC,CD,80,D7,CIJ,B0 1 EF,CD,80,DF,3E,Û7,CD,5A,BB,CD,06,BB 

,21,80,F7,06,00,CD,BC,BC.21,O0,00,ll,OO,OO,Ol,00,OO.3E, 

ÛO,CD,98,BC,CD,8F,BC,3E,07,CD I 5A,BB,CD,00,00 

1000 IF P=2 THEN RESTÛRE 1040:T=26 >BL 

1010 IF P=3 THEN RESTORE 1050:T=53 >BP 

1030 FOR B=61312 TO 613U+T:READ HdPOKE B,YAL("V+H*) : >RR 

KEXT:CALL 59264 

1040 DATA 21.8f.ef.ll,00,Ol,Ot,0b,O0,ed.bO,cd,OO,Ol,c9, >PG 

3e,cl,le,00,df.08,01,c9,81,c5,07 

1050 DATA 21,BF.EF,U,00,01,01,26,00,£D,BO,CD,00.01,C9, )XD 

éd. 5b. 42, be, 21, Od, 01, 01, 19, 00. ed,b0, o9,28,00, 03, 07, 00,o 

h,00.3f.00,c0.00.10,00.01.00,0a.0a,20,32.e5,02.04.00.00 

■ ff 



*è& 



*sar 



Voici un listing plein 

d'erreurs. Ce n'est pas 

la peine d'écrire à la 

rédaction pour nous 

abreuver d'injures : 

on l'a fait exprès ! 

D'ailleurs, il y aura 

un rectificatif dès 

le mois prochain. 



Alors pourquoi publier ce genre 
de listing. Mais pour votre 
bien à tous voyons. Tout le 
monde soit que la recherche des er- 
reurs est le passe-temps du program- 
meur et qu'il n'existe pas de meilleur 
moyen pour faire entrer la syntaxe de 
ces satanés mots clés BASIC que de 
"plancher" sur un listing. 
Mais avant de vous lancer dans 
l'étude Intensive de ces quelques li- 
gnes numérotées, voici quelques In- 
formations utiles : ce programme est 
censé vous demander un nom de fi- 
chier correspondant à une page 
écran de 1 7 Ko, puis vous devez en- 
trer le mode graphique de ladite pa- 
ge. Le tout sera placé à l'adresse 
&4000 puis affiché "d'un seul coup" par 
le CALL de la ligne 110. Ensuite l'Image 
sera effacée par 500 points de cou- 
leur placés au hasard sur l'écran. Puis 
CLS général pour effacer le reste. 



Les erreurs peuvent être de syntaxe, 
de structure ou bien le listing peut pré- 
senter des incohérences et même des 
choses superflues. A vous de débug- 
ger correctement, SI cette forme de 
loisir vous Intéresse, rien ne vous em- 
pêche de nous le dire, nous publie- 
rons olorsd'autres listings, peut-être plus 
difficiles. Bon courage et attention aux 



80 IF INKEYS <>""THEN 60 

90 MODE MODE :'ON PASSE DANS 
LE MODE GRAPHIQUE DE LA PA- 
GE ECRAN 

100 LOADNOM$,&4000 

110 CALLBC06,&40 

120 REPEAT 

130 X = INT(RND(0)-16000) 

140 POKE0,&4000+X 

150 K = K+1 

160 UNTILK = 500 

170 CLS 

180 END 



10 REM LISTING TRUQUE 
20 

30 CLEARi'ON EFFACE L'ECRAN 

31 MODE01 :'ON PASSE EN MODE 01 
40 INPUTNOM DU FICHIER ?":NOM 
60 INPUTMODE GRAPHIQUE" .MODE- 
70 LOCATE42,! : PRINTINTRODUISEZ 

LA DK OU LA K7 ET APPUYEZ SUR 
UNE TOUCHE: 



N'OUBLIEZ PAS ! 

AMSTAR & CPC 

SORT AUSSI 

EN AOUT ! 



GUIDE DU 
PROGRAMMEUR 



12» IF ERR=Î5 TXEN OSlV 



iNl CHBH7] i CfBII!4Ji 1 




Voire programme est maintenant fin prêt, il ne vous reste plus qu'à envoyer ""IÏLpS 
votre œuvre à AMSTAR & CPC. Mais n'oubliez pas : • 

• d'envoyer les programmes sur un support magnétique (disquette ou cassette) 

• de joindre un mode d'emploi détaillé manuscrit ou dactylographié, la liste complète des variables peut 
également être utile. 

Quelques cas spéciaux : les jeux. Joignez les solutions ou bien des astuces pour "visiter" l'intégralité du 
programme. 

- les programmes sources en assembleur seront publiés à condition de posséder un commentaire con- 
séquent. 

• les listings sur papier ne sont pas obligatoires puisque les programmes sont de toute façon réimpri- 
més. 

■ le programme enregistré doit répondre à certaines caractéristiques. 

- la taille des commentaires mis en REM ne doit pas dépasser 35 caractères. 

- il faut éviter l'utilisation des codes de contrôles (CTRL X, CTRL I etc.) ceux-ci n'étant pas "digérés" par 
l'imprimante. 

- les listings en assembleur doivent être accompagnés des chargeurs BASIC adéquats. 

Enfin, essayez d'être original, nous croulons sous les Master-Mind, les Yam, les gestions de fichier, les 

lotos sportifs ou non. 

A bientôt dans AMSTAR & CPC. 



PARTICIPEZ A AMSTAR & CPC 



LE PROGRAMMEUR 

Nom. ___ ^ 

Adresse complète 



Age- 



Joîndre un relevé d'identité bancaire pour paiement 
de vos piges. 



Attestation sur l'honneur 
Je s 



déclare être l'auteur du programme ci-joint et ne 
l'avoir Jamais proposé à une autre revue. 



LE PROGRAMME 



Catégorie Q Jeu Q Utilitaire Q Educatif 
Taille 



Périphériques utilisés 



Support Q Cassette Q Disquette 

Comptabilité (testée) avec : 

□ 464 □ 664 □ 6128 Q PCW 8256 

□ PC1512 □ PCW 8512 

Signature 

s conseillons à notre clientèle de 




Il est difficile de taper un programme d'une revue 
sans commettre d'erreurs I Quand les erreurs sont 
signalées (Syntax error in..., Lines does not exist in...), 
la correction est facile puisque la ligne est indiquée, mais 
lorsqu'au "point de vue' du CPC. le programme est 
rect. Il peut en être fout autrement pour le lecteur. 
Si le fonctionnement du programme ne correspond pas 
vraiment au programme original, alors il est Impossible 
de retrouver l'erreur commise, à moins de comparer las 
lignes de votre programme avec celles du journal, mais 
c'est très long et on risque de passer sur une erreur sans 
la voir. 

C'est pourquoi ce programme a été créé; il est à utiliser 
si vous ne retrouvez pas vos erreurs. 
La frappe d'un programme de. votre journal favori (CPC) 
terminée, vous faites "RUN" et là, vous corrigez toutes 
les erreurs signalées par le CPC en vous' référant au jour- 
nal pour comparer. SI malgré cela, il ne tourne toujours 
pas, suivez cette procédure : 

- sauvez votre programme en ASCII grâce à l'instruction 
; Save "nomprog',A. 

Puis, si vous êtes sur K7, rembobinez la bande jusqu'au 
début du fichier; 

- chargez Anti-Erreurs; 

- entrez le nom de votre programme et insérez le sup- 
port où il se trouve (K7 ou disquette). 

Après quelques secondes, les numéros de ligne vont 
défiler. Vous remarquerez qu'à chaque ligne correspond 
un code de 2 lettres sous cette forme : >XX ; c'est le code 
qui va vous permettre de savoir d'où proviennent les 
erreurs. Pour cela. Il faut que vous compariez les codes 
du journal à ceux de l'écran. SI un code diffère, notez 
sur papier le numéro de ligne qui correspond à ce code. 
Continuez ainsi Jusqu'à la fin du listage. Le défilement 
terminé, recherchez votre programme et corrigez les lignes 
que vous avez notées en comparant avec le journal. 
Faites "RUN" et, ô miracle I, ça marche. 
Attention, lors de la frappe du programme à traiter, 
n'omettez aucun caractère car Anti-Erreurs les prend en 
compte et bien sûr, ne tapez pas les codes de contrôle. 



►5.) 

► 40 
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* "* 
■ * . - ANTI - ERREURS - * 

* ' ■' ■ ' , ■■• '* 

* VERSIÛN.2.9 * 
#""- ■ ■'. * 

le! CPC S G. NOE 1987 



ON ERRQfi GOTO 1250 
MODE 2 
DM 6*(23> 

FOR I=D TO 22:READ G$:6$UJ=Gt:NE:<T 
ATTENTION LA LIGNE DE DATA CI-DESSOUS NE CONTIENT 
TOUTES LES LETTRES DE L'ALPHABET ! ! '. 
DATA A,B,C,D,E,F,6,H,J,K,L,M,P,Q,K,T,U t V,W,X,Y,Z 
' ANTI-BUG FICHIER 
IF PEEK(HIHEM+1)=255 THEN 2B8 
OPENDUT "CPC" 
HEMORY HMEM-2 
CLOSEOUT 
FOKE HIHEil+1,255 



29e DEFINT B-Z 

290 ' 



>WH 
>TB 



300 BORDER 6:INK 8,1,-INK 1, 16:PEN 1: PAPER 

île nove e.ièiDRAw 650,16 ; 

320 PRINT TABI27) "ANTI-ERREURS " : CHR* (24 >ËU 

); "Version 2.0";CHR$(24) 

330 MOVE 0,385:DRAW 656,385 >UJ 

340 LOCATE 24,25:PRINT"CPC REVUE DES STANDARDS AMSTRAD" : 



350 HINDOU 1,80,3,23 

360 fl»="Realise par Gregory NOE" 

370 F*= d " î 

389 FOR 1=1 TO LEN(!tt> ï 

390 FÏ=FS+MiPïlfH.l,l) ) 
400 LOCATE 70-I,5:PRINT F* ; 
410 FOR T=l TO iee ; 
420 NEXT T,I 3 
430 ' ï 
446 ' ****** ****************** ********* ; 
450 : 

460 LQCATE 2.1:PRINT"ENTREZ LE NOM DU FICHIER : ": ï 

470 INPUT "",NF* î 

480 IF NFM"" THEN PRINT CHRS(7):G0TO 460 I 

490 LOCATE 2, 3: PRINT" IMPRIMANTE OU ECRAN (I/EI?" ) 

500 R*="":KHILE R$="":R*=UPPER*UNkEY*) :WEND ) 

510 IF R*= 1 i" THEN Cft=B : PRINT " BRANCHEZ-Lfl . . ." ELSE 540 ; 

520 PRINT#B,CHR*(27);"'";CHRÎ(20) ï 

530 GOTO 560 ) 

540 IF RÎ="E" THEN CA=0:GOTO 560 î 

550 GOTD 500 ) 

560 CLS;LOCATE 2,3:PRINT"TANT QUE LE LISTAGE N'EBT PAS ; 

TERMINE" 

570 LOCATE 2,5:PRINT N NE PAS ARRETER LE MAGNETOPHONE OU ) 

NE" 

580 LOCATE 2,7;PRINT"FAS SORTIR LA DISQUETTE" ' 

590 LOCATE 2, 10:PRINT"PRESSEZ UNE TOUCHE POUR LA LECTUR ) 

E" 

608 CALL fcBB05 3 

610 ' ) 

620 ' <««««««««««« ; 

630 '< TRAITEMENT DU FICHIER > > 
640 ' »»>»»»»»»»»» 

650 ' > 

660 DPENIN "!"+NF* } 

670 CLS:PRINT"TRAITEMENT EN COURS.. ." > 
680 IF LEN(AI)=255 THEN A$="":LINE INPUT#9,B*:GDTO 1160 > 

690 LINE INPUTt9,B$:A*=BS ) 

700 IF CA<>8 THEN GOSUB 1310 ) 

710 IF INKEY(66)=0 THEN STDP ) 

720 ' ) 

730 ' CALCUL DE LA CLE DE CONTROLE î 

740 ' > 

750 A=0:FLS=0 

760 FOR 1=1 TQ LEN(A$) 

770 L*=fflM(M,I,l> 

780 IF L$=CHft$(34) AND FLG=1 THEN FLG=0i6OTO E 

790 IF L*=CHR$(34) AND FLS=0 THEN FLG=1:60T0 8 



>NL 



>PH 



B00 IF LÎ=CHRSI32) 


AND FLGO 


THEN 850 


810 If L$=CHR*<39) 


AND FLG=0 


THEN B60 


820 IF FLG=1 THEN 840 




B30 L$=UPPERS(H) 






840 A=A*ASClLtl+I 






850 NEXT I 







870 CH$=STRXA) 

886 CHÏ=RIGHTÏ(CH*,LEN(CH*)-1) 
890 L=LENtCH*):L2=LEN(CH»)/2 
900 A=VAL(LEFTï(CH*,L2)) 
910 C=INT(A/23) 
920 P=A-(C*23) 
930 CS=G$(P) 

940 A=VAL<RI6HTtiCHÎ.L-L2)l 
950 C=INT!A/23):P=A-(C*23) 
960 C$=CS+G$(P) 
970 ' 

980 FOR 1=1 TO 6 
990 Lï=MID$(AÎ,I,l) 
1000 IF L*<"0" OR LÏ^-'THEN 1030 
1010 LI*=LI*+L* 
1020 NEXT 

1030 VM$="":FOR 1=1 TD LEN(AÏ):IF ASClMIDtlAS, 1, 1) K32 : 
THEN VMS=VM$t" " ELSE VM$=VMI+MIDÎIA$, I, 1! 
1040 NEXT I:B*=VM* ! 

1050 ' 

1060 IF CAOB THEN 1070 ELSE 1090 ; 

1070 PRINT LI*iTAB(I0) ">";CJ 

10B0 LI$= llN :G0T0 1160 ) 

1090 LIÎ="":PRINTSCA,LEFT$tB$,55):TABi57) ">":CÎ 
1100 IF LEN(Bt)<55 THEN 1160 S 

1110 FG=1 

1120 B$=MID$(6$,56,LEN<B$>) l 

1130 PRINT*CA,LEFTÎ(B$,55) S 

1140 IF FB=1 AND CA<:->B THEN FG=0:6OSUB 1310:6OTO 1150 ; 
1150 GOTO 1100 

1160 IF EOF=-l THEN CLOSEIN ELSE GOTO 6B0 ', 

1170 IF CA=0 THEN CALL i:BB03:PRINT TAB(50) CHR$(24) î "UN : 
. E TOUCHE. ..";CHP,*(24):CALL &BB05 
1180 CLS: PRINT "HA INTENANT RECHARGEZ ";NF*; IL ET CORRIGEZ ; 
LES LIGNES QUE VOUS AVEZ NOTEES.." 
1190 END ; 

1200 ' ; 

' <«««««««««««« ; 

< TRAITEMENTS DES ERREURS > ) 



1210 
1220 
1230 
1240 
1250 
NON 
1260 
1270 
1280 
1290 
1300 
1310 
'UNE 
1328 



IF ERR=25 THEN CLS:PRINT CHR$l7>;CHR*(24)j "FICHIER ) 
ASCII";CHfi$t24):END ELSE CDNT 

' ««<«««««««««« ) 

'< ATTENTE TOUCHE. . . > } 

' «««««««««««<« > 

CQM=COH+l: IF COM>19 THEN CALL &BB03:PRINT TABI50) ) 

TOUCHE...": CALL &BB05:CLSîCDM=l 

RETURN ) 



■■,..:■■... ' : '' ' 



_. . ■ ■ 



DOSSIER 



VOUS AVEZ DIT 
ASTUCES? 



Puisque vous avez la chance d'être en vacances, nous avons pensé que vous auriez maintenant 
tout le loisir de taper de petits listings qui vous offriront des vies infinies, des munitions 
illimitées ou autres avantages pour tous vos jeux préférés ! Mais avant de vous lancer dans cette 
entreprise, nous vous conseillons de faire les deux choses suivantes : d'une part vérifiez que 
le listing est adapté pour un logiciel sur cassette ou sur disquette en consultant le tableau 
ci-dessous et, d'autre part, lisez le mode d'utilisation pour chaque listing. 
Tout d'abord, vous commencez par saisir le listing et vous le sauvegardez sous le nom 
que vous voulez. Ensuite, vous éteignez et rallumez votre ordinateur puis vous chargez 
votre programme de bidouilles par un ordre LOAD. Vous mettez en place le programme 
original et vous lancez la mise en route avec RUN. Vous n'aurez plus alors qu'à laisser 
faire ou à répondre aux questions s'affichant à l'écran. . .- 

BONNES VACANCES - BON COURAGE. . . ET N'OUBLIEZ PAS QU'AMSTAR & CPC 
SORT EGALEMENT UN NUMERO EN AOUT ! 



^> 





BARBARIAN II 




X 


BATMAN 


X 




BIONIC COMMANDO 


X 




BLASTEROIDS 




X 


CRAZY CARS 


X 




DARK FUSION 


X 




DRAGON NINJA 


X 




LED STORM 




X 


NAVV MOVES 


X 




NETHERWORLD 


X 




OPERATION WOLF 


X 




K-TYPE 


X 




RETURN OF THE JEDI 


X 




ROAD BLASTERS 


X 




ROBOCOP 


X 




RUN THE GAUNTLET 




X 


SAMURAI WARRIOR 


X 




SAVAGE 


X 




THE DEEP 




X 


THE LAST NINJA ï 


X 




THUNDER BLADE 


X 




TOTAL ECLIPSE 


X 




TYPHOON 




X 


WEC LE MANS 




X 



wsm - . ' 



W *l 


«■**" 


COMMANDO 


' IV! :. 




10 ' BATHAN 

20 RODE 1:PBIKT «Patientez... Charge 
■ent des datas !':PfilNT:LlGN-70:DiB 
=ie0O0:G0SUB 50:LIGN=670:DER=t<BEAO: 
GQSUB 50 

30 CLS:PBINT «Retire la cassette or 
lgiiale... B iPRIHT "Avec la partie g 
ue vous desirez charger... ":Fûfi H=l 

TO 1000:NEn:CLS 

40 RERQBY i3FFF;CALL tBD37:L0A&"ï", 
fc400û:H0DE LilNK 0,2G:1KK 1,2:IKK 2 
,0: INK 3,i6:F0B K=l TQ 20û:NEÏT:CAL 
1, iBEAQ 

50 EEAD A»; IF **="*■ THEN HETUfiH 
60 8EAD TQT:SOH=0:FOB H=l TO 20 STE 
P 2:A=tfAL<"*MHIM(At,N,2)):PÛKE Dl 
8.A:S0H=S0H*A:DIB=D!B+1:HEÏT;1F SOH 
=TOT THEtt LIGN=LIGNtlO:GQTO 50 ELSE 

PEINT "Erreur a la ligne "LIGN:EHD 
70 DATA C7D108FEQ1067F3E10ED, 1U9 
80 DATA 793E54ED79D9E1DBD81B, 1524 
90 DATA DF3D20FDA724CS06F5ED,1460 
100 DATA 7ÛA9E6Û02GF5067F3E1Û, 1143 
110 DATA ED79792F4FD37D3CEB0F, 1252 
120 DATA 6FF620D917ED7937C93D,13Q4 
130 DATA 20FDA724CB06F5ED78A9,1465 
140 DATA £68028F5067F3E10ED79,1212 
150 DATA 792F4F1F3E2A17ED7937,B1B 
160 DATA C9Q6F63ElûED79D9ES2E,13Bi 
170 DATA 00D9216CA6E506F5ED78,I361 
180 DATA E6804FCD7CA630FB2U5,1285 
190 DATA 041OFE2B7CBS20F93E0A,975 
200 DATA CD7CA630EA26C43E1CCD, 1306 
210 DATA 7CA630E13EDABC38F226, 1367 
220 DATA C43E1CCD7CA630D33EDA, 1320 
230 DATA BC38E4FD21ADA8FD6E00,1462 
240 DATA 26C43E1CCD7CA630BE3E T 1119 
250 DATA D7BC30DD2C20EF267Q3E.1199 
260 DATA 1CCD7CA630AD3E1CCD7C,1163 



270 DATA 
260 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
480 DATA 
490 DATA 
500 DATA 



A630A67CFECD300EFE9C.1435 
30CFFD23FD7DFEB120CB, 1587 
18CS3E0B26S02E083E0B,567 
18023EÛ9CDA2A6D03EOB,911 
CDA2A6B03E9FBCCB1S26, 1412 
80D24FA73E1DBDC25BA6,1315 
OOAF0826A12£01FD2100,7i5 
A03E041B173E17ADC677,848 
DD7700DD231B26A12E01.B69 
2EO13E0il8023E09CDA2,574 
A6D03E0SCDA2A6DO3EC0, 1442 
BCCB1526A1D28FA708AD, 1312 
0S7AB32ÛCEC368A63E17, 1097 
ADC677DD7700DD231B2E,1159 
023E0426B3CD2CA8D0FD,U63 
7E04B7285 A6901007FOO, 676 
000ÛFD4E00FD4601DD21 , 909 
00O0DD094D3E012EO226, 456 
B3CD2CA3D03E7FBD2803, 1225 
32ACA62E023E0826B3CD, 930 
2CA8D0FD5E02FD560369 ,1216 
010500FD094D7BB226A1,B45 
2E013E0iC291A71168A6,B03 
ED53ADA71194A7D5ED5B, 1533 



510 DATA 
520 DATA 
530 DATA 
540 DATA 
550 DATA 
560 DATA 
570 DATA 
. 580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 



CFA8C3A6A63E06000016, 

B63E0DC0A2A63E10CDA2, 

A6D03EDBBCCB1526B3D2, 

2AA8C9CDC2A621008006, 

FFCS1E004B16FF06F5ED, 

78E680A928501C792FE6, 

eO4F15C24EA87323C110, 

E22100001132800632C5, 

1A06004F0913C110F6E5, 

21Q00ÛUCDB0Q632C51A, 

06004F09i3C110F6C17C, 

B72013A7ED42013200A7, 

ED42D80901CDFFA7ED42, 

D03C32ACA8C9O0OOC35D, 

A6001E2A28220O0O0000, 

* 

F32100801i67A60i4A02, 

EDB0DD21B1AB11Q501CD, 

40AB3EC332A8A921«BE, 

22A9A9C3DBA63A00B021, 

B372FE45280321BC70AF, 

77210ÛCOC377BFOO00O0,: 



smm 





; 



fRAZY car» 



10 'CRAZY CARS 

20 MODE i:CALL &BD37:0N ERROR GOTO 70 

30 INPUT "Teips infini Î^A* 

40 INPUT "STAGE (0-6)", S 

BO INPUT "LEVEL !0-B)",L 

60 POKE &B0EE.bC9:H0OE 0:FOR 8=0 TO lSîiNK R.O'.NEIT: BORDER 

70 LOAD "!^iCQ0O.:j> <JftQ.> } 

80 HEHORÏ UFFF 

90 FOR R=0 TO 15:INK R,PEEK!655ÛO*R):HEXT 

100L0AD "!■ CûOAl/ 

HO IF UPPER*(AÏ)="Û» ÎHFJ POKE t51A5,0 

120 POKE 451A5.0 

130 POKE M1F2,0:POKE 441F3,0:POKE i4iF4,0:POKE 6592A.S 

140 POKE 441F5,0:PQKE 44iF6,Q:PQKE 64tF7,0:P0KE fc5929,L 

150 CAU. MOOO 



ï:.t h. 



M 



m S î 




fARK FUSIO 



N 



10 'DARK FUSION 

20 HQDE IsFOR N=t9200 TO 4920C:READ A*:PÛKE N : 

,VAL("li'+A*J:NEn 

30 INPUT "Vies Infinies ?";A*:1F UPPER$(A*)=" 

0" THEN POKE 69201,0 

40 INPUT "Energie infinie ?";A»:!F UPPER*1A$) 

="0' THEN POKE fc9206,SA7 

50 P81NT:PR!HT "Mettre la cassette originale. 

..":FOB N=l TO 1000:ffi!T ' 

60 RODE 0:HEHÛSY 4271B:CALL iBD37:L0AD"!loade 

r" 1 427!0:P0K£ 42B7D,0;POKE k287E,(<92;CAt.L 42? 

10 

70 DATA 3E,l,32,Cfl,7,3E,96,32,40,19,C3,B4,3 




BlasteroidS 

mmmm 

10 'BLASTEROIDS 

20 KEMORÏ 19FFF:H0DE 1 

30 FOR N=aAO00 TO 4A02E:READ A*:A=VAL("fc"tAt) 

40 S9H=SOH+A:P0KE N,A:NEIT 

50 IF S0HO2543 THEN PRIHT "Erreurs dans les datas. ,.":EHD 

60 PR1NT:PR!NT "Hettre la disquette originale puis appuyez s 

ur une touche..." 

70 CALL iBB06:CLS:CALL 4A000 

80 DATA 21, 1F, AO, 11,40,00,01, 30, 00,ED,B0,lE,00,53,0E,4i 

90 DATA 2i,ÛO,Ût,DF,2C,AO,2i,40,00,22,OS,Ûl,C3,ÛO N 01,3E 

100 DATA 00,32,58,21,00,00,00,00,00,03,24,13,66,06,07,00 





;■;;"■■■; 



n 

I IDA^HM Ml M 



'nAuUIN EMIIMUJ 






10 'DIAGOH NIHJA 

20 «ODE 1:50H=0:FOR K=4BF0O TO tBF38:BEAD Ai:A=IJL("s'tAS):P 

OKE H,A:S0»=SOKtA:NFJT:IF S0HO5044 THE» PEINT "Erreur dans 

les datas.. .':END 

30 IHPUT "Uies infinies ?";a*:!F UPPER*(A*)="Q" THEN POKE AB 

F25.0 

40 INPUT "Inimité ?";al:[F tlPPEMIatl^O" THEN POKE 1BF2A.0 

50 INPUT "Continuer Jusqu'à la lort ?";al:lF UPPEil(At)="0" 

THEN POKE ABF32.0 

60 PRIKT.-PRiNT "Mettre la cassette oii|inale...':F01 11=1 TO 

iOOOiKEIT 

70 CALL ABD37:HEH0RÏ A7FFF.-H0DE l:L0AD"!",aBOO0:CAU kBFOO 

30 DATA F3,21,iB,flO, 11, 0,80,1,42,1, 7D.ED,4F,ED,5F.AE,EB,AE,E 

B,77,23,13,B,73,Bl,20,F2,21,24,BF,22,51,60,C3,lB,e0,3E,3D,32 

,54,1D,3E,3D,32,16,1F,32,S1,22,3E,3D,32,7,15,C3,0,80 








"■»i 



IV 




10 'LED STG6N 

20 HEHOBY tAOO0;KODE I : BOBDER 0:L=liO 

30 FOR N=&A0A9 TO &A39A:BEAD A$: A=VALC&*+A4> :D=OM 

40 IF D<17 THEN POKE N,A:SOH=SOM*A+255»(SOHtA>£55)iG0TO 70 

50 IF SONO A THEN PftINT "Erreur a la ligne ";L:EHD 

60 SOH=0:D=0:N=H-1:L=LHO 

70 NEXT:INPUT "Niveau de départ (1/9) ";A:PQKE fcA180,A-l 

80 OUT &FA7E, 1:PRÏNT "Mettre la disquette originale puis app 

uyez sur une touche..." 

90 CALL &BB06 

100 IKK O,0:INK 1,6: ENK 2,24: JNK 3,13:H0DE 1:CALL &A0A9 

110 DATA F3,DD,21,3E,A3,DIl,66,00,Iffl,23,JBlï,fiE,OÛ,Iffl,23,22,89 

120 DATA 2B,A3,5D,CD,02,A2,21,25,A3,35,CA t 64,Al,DD,7E,O0,EA 

130 DATA 32,50,A1,DD,23,DD,7E,00,32,3B,A1,DD,23,DD,7E,00,ED 

140 DATA 32,42,A1,32 ) 53,A1,DD,23,DD,23,DD,23,CD,8E,A2,22,61 

150 DATA 1D, A3, ED,43,1B.A3, £5,21,00,00, 59,50, A7.06, 09, CB.E3 

160 DATA 1A,CB,1B,CB,1C,CB,1D,10,F6,06,Q7,A7,CB,IC,CB,ID,5E 

170 DATA 10,F9,22,20,A3,43,El,78,32,iF,A3,B7,28,07,C5,CD,FC 

180 DATA 99,A1,C1,10,F9,ED,5B,20,A3,7A,B3,28,OD,ED,53,22,DA 

190 DATA A3,CD,99,A1,Z1,FF,FF,22,22,A3,2A,1D,A3,ED,5B,1B,05 

200 DATA *3,06,00,D5,E5,19,2B,7E,EE.22,4F,AB,41,77,2B,1B,30 

210 DATA 7A,B3,20,F3,E1,D1, 06,00, 7E,EE,22,4F,A8,41, 77, 23,5F 

220 DATA 1B,7A,B3,20,F3,CD,C2,A2,C3,BF,A0,21, 40,00,11, 00,27 

230 DATA 0Q,01,C0,3C ( ED,B0,21,94,9D,ll,00,0Q,0i,40,0O,ED,3O 

240 DATA B0,3E,C0,32,7B,5A,3E,0O,32,F9,47,AF, 32, E8.5A, 32,00 

250 DATA 3F,4C, 32,40,40,32,41, 4C,0i,7E,FA,ED, 79, C3,2Q,4C,1C 

260 DATA 3A,2C.A3,C6,a,4F,3A,2B,A3,47,CD,C5,Al,D2,D9,A0,B4 



270 DATA 3 
230 DATA 2 
290 DATA 3 
300 DATA C 
310 DATA Ë 
320 DATA ; 
330 DATA A 
340 DATA t 
350 DATA F 
360 DATA F 
370 DATA C 
380 DATA 2 
390 DATA 7 
400 DATA E 
410 DATA C 
420 DATA 4 
430 DATA E 
440 DATA D 
450 DATA 1 
460 DATA 2 
470 DATA ï 
480 DATA C 
490 DATA 7 
500 DATA C 
510 DATA C 
520 DATA Ë 
530 DATA 
540 DATA C 
550 DATA F 
560 DATA I 
570 DATA 2 
580 DATA C 



4B,ED,3 
C8, 22,0 
01,00,0 



_ . ___ ■■ __ 



N 



AVY MOVE* 



10 'NAVT HGVES 

20 HODE 1:L=200îCALL fcBD37 

30 FOR ï=fcBFO0 TO &BF52 STEP 12 

40 L=L+10:REÀD LIGM*. CHK*sCHK=0 

50 FOR M TO 24 STEP 2 

60 A=VAL("t"+HlDÏ(L!GH*,ï,2)) 

70 CHK=CHKtA 

80 POKE X*Y/2,A 

90 HEXT 

100 IF CHKOVALIW+CHK*) THEN PHINT 

"Erreur a la ligne ";L:EHD:NEIT 

110 IMPOT "Vies infinies ";A*:1F UPPE 

6*IA*)=*0" THEN POKE iflFll,Q 

120 1NPUT "Insensible aui unes ";AJ: 

IF UPPER*(A*)="N" THEN POKE tBF16,tl5 

;POKE tBF17,iBF 

130 INPUT "Chocs contre les hors-bord 

s M/M ";A*:1F UPPERKA*)="N" THEN P 

OKE &GF2I.&FF 

140 1NPUT "insensible aui requins (0/ 

N) ";A*:IF UPPEfi*(A*)="0" THEN POKE (. 

BF2B.M8 

ISO IMPOT "Insensible aui plogeurs (0 

/H) ";At:lF UPPER*(A*)="N" THEN POKE 

&BF30,ît30:PÛKE feBF31,&BF 

160 INPUT "Un seul îisslle pour tuer " 




une lurene (0/N) ";A*:IF UPPER*(A*)=" 

0" THEN POKE &BF3B. 1 

170 INPUT "Un seul ilssile pour tuer 

une pieuvre (0/N) ";A*:IF UPPER»<A»)= 

"0" THEN POKE &BF40, 1 

180 INPUT "Bouée de départ (0-3) ";ï: 

POKE &BF45, (ï AND l)ii5Û+50:P0KE ISH 

6,INT(I/2) 

190 HEHORY t9FFF:H0DE liLOCATE 1,24:P 

RIKT "Hettre la preiiere partie de Ha 

vy Hoves ";:L0AD"!C",UOOO:POKE IA059 

,tcC3:P0KE fcA05A,fcE:PÛKE fcA05B,fcBF:HQD 

E 0;CALL &BFO0 

200 HEXT 

210 DATA 2100A011E80301F501Ei)B0C3,514 

220 DATA E803E5F53E3D32E479212B9E,5B9 

230 DATA 36O02336OO2336OO3E0OB728,205 




240 DATA 053EC332BE9C3E3032698C2i,44S 
2S0 DATA 0A8236O023360O2336003E1E, 100 
260 DATA 32G17F3E12328S9521000022,2F1 
270 DATA 0A73FiElD02180A6C34SO40O,57F 

10 'NAVÏ HOVES 2eie PARTIE 

20 HODE 1:L=180:CALL &BD37 

30 HEHORY 29999:G0SUB 100 

40 IMPOT "[Muni te (0/N) ";A$:IF UPPE 

ÏMA*)='D" THEH POKE fcBFll.fclOîPOKE t 

BF12,tBF 

50 IHPUT "Vies infinies ";AÏ:1F UPPER 

*<A»)="N" THEN POKE fcBFlM10:PQKE tB 

TIE.fcBF 

60 INPUT "Balles infinies ";A*:IF UPP 

EH*(A»)="N" THEH POKE tBF20,ti0:P0KE 

4BF21,iBF 

70 IHPUT "Lance flaHes Infini ";A1:I 

F UPPER*(A*)="H" THEN POKE tBF28,fclO: 

POKE &BF29,iBF 

80 HODE i:LOCATE 1,24:PR!NT "Hettre l 

a 2eie partie de Havy Hoves..."; 

90 LOAD "!C",1A 000:POKE 6A059.iC3:PO 

KE sA05A,fcE:P0KE aA05B,tBF:HQDE 0:CAL 

L ItBFOO 

100 FOR X=kBFOO TO 1BF37 STEP 12 

110 L=L+10:READ LiGNf ,CHKI:CtflC=0 

120 FOR ï=i TO 24 STEP 2 

130 A-VAL("lt a +HID$(LiGN*.î,2)> 

140 CHK=CHK*A 

150 POKE X+Ï72.A 

160 HEn 

170 IF CHKOVALf&^CHKI) THEN PR1HT 

"Erreur a la ligne ";L:END 

1B0 NEXTîRETURH 

190 DATA 2100A011Se02QlF501EDBOC3,483 

200 DATA 5802E5F521FB893600233600,468 

210 DATA 233600AF32EB79210B823600,37F 

220 DATA 2336002167823600233GOOFi,2E3 

230 DATA E1DD2100A2C3B50200000000,3FB 



■■■■■■■■..■ ■■■■■■■:■■:■. 





ETHERWORLl 



M:Sûn=SQHtA:NEXT:]F S0MO3479 THEN PR1NT "Erreurs dans les : 
datas.. .":END 
30 INPUT "Vies infinies ?";A*:IF UPPE£ïlA»)="Q" THEN POKE fc8 
1.0 

40 iNPUT "inimité ?";A*:IF UPPER»(A*t="Q- THEN POKE t86,0;P ] 
OKE iBB,Q:PQKE WO.ACfl 

50 INPUT "Teips infini ?";AI:IF UPPE8*(A*)="Û" THEN POKE (£5 | 
,0:POKE &8A r fc3E:PQK£ ti9F,9:PÛKE iA4,fcA7 

60 INPUT "Noibre quelconque de diaiants ?";A*:IF UPPER*lA*)= \ 
"0" THEN POKE fcA9,fcAF 

70 PRINT:PfiiNT "Hettre la cassette originale.. .":FÛ8 N=l TO ; 
100D:NEIT 

80 CALL fe6D3?:MEM0fiï &3FBF:H0D£ kLOADV.MFCOtfOKE M15B.A \ 
B0:POKE MiSC.OtCALL &3FC0 

90 DATA 3E,1,32,BF,27,3E,3D,32,CF,25,3E,3D,32,D8,26,3E,2A,32 \ 
\ ,BF,27 l 3E,32 t 32,i4ti8,3E,fi5 1 32,l6,i8 ( 3E f 7E,32 1 17,i8,3E,3D,32 ; 
,Ci,64,3E,B4,32,£3 t 19,C3 ( 0,l 



R-typE 

osa 



10 'R-TYPE 

20 RESTORE :HEH0fiT &3FFF s MODE 1:PB1N 
T "Patientez. . .Chargement des datas 
!":LIGN=100:DIR=fc4000:GOSUB BO:LIGN 

: =700:DÏR=4AÛÛ0;GÛSUB B0:CLS 
30 INPUT "Vies infinies ?';A*:IF UP 
PEH*(A»)="0" THEN POKE U020.0 
40 INPUT "Crédits infinis ?";A*:IF 

. UPPEBî(A*)=*0" THEN POKE U02S.0 
50 INPUT "luunite totale ?";At:IF 
UPPERt(A*)="0" THEN POKE iA02A,iC9 
60 PRINT:PfilNT "Mettre la cassette 
originale.. .":F0R H=l TO iùûO;NEÏT 

I 70 HODE 1:CALL b&D37:LOAD"! fl ,t<6000: 

_ MODE 0: BORDES 0:F0R N=0 TO 15: SE AD 
A:INK N,A:NEIT:FOS H=l TO 200:NEÏT: 
CALL UOOO 

60 READ A*: IF A)="i" THEN RETURN 
90 READ TOT:S0H=O:FOR N=i TO 20 STE 
P 2:A=VAL("b 1 +KID*(At,N,2)):P0KE &l 
B,A;SGH=50H+A:DIR-DlR*i;NEXT:iF SOH 



=TOT THEH LlGN=UGNU0:GOT0 60 ELSE 170 DATA 

PEINT "Erreur a la ligne "LIGN:END 180 DATA 

100 DATA C7DiOBFE01067F3E10ED,lH9 190 DATA 

110 DATA 793E54ED79D9ElD9DBie,1524 200 DATA 

120 DATA E03D20FDA724C806F5ED,1461 210 DATA 

130 DATA 78A9E6B028F5067F3E10, U*3 220 DATA 

140 DATA ED79792F4FD97D3CE60F.1252 230 DATA 

150 DATA 6FF620D917ED7S37C93D,13O4 240 DATA 

160 DATA 20FDA724C806F5ED7BA9,1465 250 DATA 



E68026F50&7F3E10ED79, 1212 
792F4F1F3E2A173DED79, 624 
37C906F63E10ED79D8E5, 1300 
2E00D9216AA5E506F5ED, 1264 
76E60Û4FCD7AA53ÛFB21 , 1381 
150410FE2B7CB520F93E,986 
OACD7AA530EA26C43ElC,liO8 
CD 7AA530E13EDABC36F2, 1531 
26C43E1CCD7AA530D33E, 1137 



ûff€ PflUŒD 



OPERATION WOLl 



; 10 'OPERATION UOLF 

i 20 HODE 1:FQB N=W00O TO fcA057:REÀD A*:POKE N,lfALl'l"+A*):NE 

I ÏT 

'\ 30 [«PUT "Energie infinie >';Aï:iF UPPEE$tA*>= , Û" THFJ POKE 

j M033,0:PQKE M038.0 

: 40 iHPUT "Grenades infinies ?';A$:1F UPPER*(A(l="0' THEN POK 

■ E U03D,liA7 

\ 50 iHPUT "Cartouches infinies ?";A*:IF UPPER*lA*)='O n THEN P 

1 OKE tAQ42,0 

! 60 1NPUT "Hunitions infinies ?";A*:1F UPPEBI(At)="O a THEN PO î^É 

: KE fcA047,0 
70 IHPUT "Continuer jusqu'à mûrir 2*\kt:lf UPPER*(A*)="0" T k&£ 

| HEH POKE 1AQ4C,0 ;^> 

3 PBIHT:PfilHT "Kettre la cassette ori|inale...":FOB N=l TO '^H& 
10Q0:HEIT 

90 CALL &B037:H0DE liHEHOBÏ f.3FFF:L0AD "! l, ,W00O:CALL 1AQ00 
100 DATA F3,21,lB,80,lt, 0,80,1, 4E,1,7D,ED,4F,ED,5F,AE,EB,AE, j 
EB, 77,23, 13,B,78,Bl,20,F2,AF,ED,4F,2i,2C,80,it,2C,8e,l,3D,l, î 
ED,B0,21,32,A0, 22,51, 63, C3,2C,B8 

110 DATA 3E,3C,32,A6,27,3E,34.32,8i,2C,3E t 30,32,36,25,3E,35, 
32,AQ,2C,3E, 35,32,02, 2C T 3E,3A,32,7B,25,3E,28, 32, 13,6B,C3,E,6 



260 DATA 
270 DATA 
200 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
460 DATA 
490 DATA 
500 DATA 
510 DATA 



DABC38E4FD21ACA7FD6E, 
0026C43E1CCD7AA530BE, 
3ED7BC30DD2C20EF2B7Û, 
3E1CCD7AA530AD3E1CCD, 
7AA530A67CFECD300EFE, 
9C30CFFD23FD7DFEB020, 
CB19C53EOB26802E083E, 
0B18023E09CDA0A5DO3E, 
0BCDA0A5D03E9FBCCB15, 
2680024EA63E1DBDC25A, 
A500AFOQ26A12E01FD21, 
OOAC3E0418173EB7ADC6, 
6ADD7700DD231B26A12E, 
012E013E0118023E09CD, 
A0A5DO3E0BCDA0A5D03E, 
C0BCCB1526A1D28EA608, 
AD087AB320CEC366A53E, 
B7ADC6ËADD7700DD231B, 
2E023E0426B3CD2BA7DO, 
FD7E04B7285A6901007F, 
000000FD4Ë00FD46O1DD, 
210000DD094D3E012E02, 
26B3CD2BA7D03E7FBD28, 
0332ABA72E023E0820B3, 
CD2BA7D0FD5E02FD5603, 
G9O105OOFDO94D7BB226, 



1678 
1054 

1199 
1098 
1400 
1530 



520 DATA 
530 DATA 
540 DATA 
S50 DATA 
560 DATA 
570 DATA 
580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
660 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 
740 DATA 
750 DATA 
760 DATA 
1,20,9,8, 



A12E013E01C290A61 166, 694 
A5ED53ACA61193A6D5ED, 1603 
5BCEA7C3A4A53E060000, 1056 
18B63E0DCDA0A53E10CD, 1094 
A0A5D03EDBBCCB1526B3, 1443 
D229A7C9CDC1A521008Q, 1343 
O6FFC51EO04B16FFO6F5, 1091 
ED78E680AS28501C792F, 1200 
E6604F15C24DA77323C1,1239 
10E22100001132800632.526 
C51A06O04F0913CU0F6,791 
E52100001 1CD8Q0632C5 , 665 
1A06004F0913CUOF6C1,787 
7CB72013A7ED42013200, 679 
A7ED42D80901CDFFA7ED, 1560 
42D03C32ABA7C90000C3, 1118 
5CA7001E2A2822000000, 405 

F32100401165A5014B02, 701 
EDBODD21BOA711ABOOCD,1403 
3FA 7211FA02259A6C3DA, 1 158 
A73E353210353E3D32OE, 732 
353ECD320435C30O7A00, 744 
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iUNTHEGAUNTLE 



10 '«IN THE CAUKTLET 

20 HErlOlY lc8FFF:N0DE 1 

30 RjR S=S90W TO i,904F:READ At:A=VALl"l"*AI> 

40 S0M=SOn*A:P0KE N,A:HFJT 

50 IF 50HO5281 THEN PSINT 'Erreurs dans les datas. ..":EHD 

60 F08 H=l TO 16:BEAD A*:PBINT Mi7AB15) i"-";A»:HE!T 

70 FOR N=l TO 3:L0CATE 2,iB:PfilNT CHR*(20>:"EPfiEUVE HUKERO"; 

H; 

«0 IHPOT »! IF A>I6 0« A<1 M» K=H-1:GDT0 70 

90 POKE 36939-»,A-i:HEÏT:L0CATE 2,22 

100 PRINT "Mettre la disquette originale puis appuyez sur un 

e touche..." 

110 CALL iBB06:CLS:CALL LOOOO 

120 DATA 21, 36,80,11,00, 80,01, 00,01, £0,80, 21, 20,90,11, 40 

130 DATA O0,01,C0,00,ED,B0,21,00,Ol,lE,O0,53,0E,41,DF,2A 

140 DATA 80,21,40,00,22,47,02,03,00,01,66,06,07,21,00,60 

150 DATA 22,36,5C,C3,00,OC,FE,01, 20,06,21, F4,06,22,C5, 00 

160 DATA 21, 48,90,30,65, 6F, 7E,C9,Û2,01, 00, 00,00,00,00, 00 

170 DATA BHITEUATERCHASE.THECBATERRACE.ASSAULTCOUBSE 

180 DATA AQUA-UUD,LIFTOFF,BARHAGE,FLASHDASH 

180 DATA OFFROADCUALLEHGE.SPLASHDOBN.D-DAV 

200 DATA »ATLRE»U!AJKE,URDE»Dll8A*CE,4mEa8AU.Y 

210 DATA POUEREITBEIIE,THETORIiADO,STOBllTHECASTL£ 




10AD BLASTER* 



HO 'ROAD BL-ASTERS 
*'' 20 MODE 1:F0R H=&AOOO TO iA079:READ A*:POKE N,VALI"4"+AJhNE 

XT 
S30 INPUT "Vies infinies Î"(MiIF UPPER*(A*)="0" THEN POKE U 

OSF,&A7:P0KE fcA064,4 
X40 IHPUT "Carburant infini ?";A*:1F UPPEH»(A*>="0" THEN POKE 

U069,0 
S.50 1NPUT "Arieient infini ?";A*:IF UPPERKAtl^Q" THEN POKE 

fcA06E,0 

60 IHPUT "Niveau de départ ?";AÏ:iF LENIADOQ THEH A=VAL(At 

)-i:!F A/3=INT(A/3> THEH POKE fcA073,A 
^70 PRINT;PRIHT "Mettre la cassette originale. ..":FÛR K=l TO 

1000:NEIT:HDDE i:HEHÛBY î,37CO:CALL (<BD37:LOAD"!\t37Cl:CALL 

ii387C:L0AD II !V4000:CALL fcAOOO 
\B0 DATA F3,2i,0,40,l,3,3,3E,BB,ED,4F,EB,5F,AE,77,Q,23,B,7B,B 

i,2Q,F5,ED,5F,C6,19,21,2E,40,l,D5,2.EMF,ED,5F,AE,77,0.23,B 

, 78,81, 20, F5,21, 0,40, 11, 0,B9,1,3,3,ED,B0,3E,40,32,36,B9,3E,C 
\ 3,32,54,B9,2i,4B,A0,22,55,B9,C3,2E,B9 
\9Q DATA DD,2i,D9,BB,li,B3,O,CD,67,BB,21,5E,A0,22,BA,BC,C3,3, 

BC,3E,30,32,FC,9,3E,3,32,4C,A,3E,3D,32,BF,24,3E,3D,32,t0,3i, 

3E,0, 32,1, 2,C3, 40,0 






ReturnofthejedI 
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10 'RETUfiN OF THE JED1 

20 HODE l:SÛH=O:F0R H=a8400 TO 4843B:READ AJ:A=VAL("à"^A$)iP 
QKE N.A:SOn>SOI1tA:NEXT:IF S0KO5925 THEN PEINT "Erreurs dans 
les datas. ,.":EHD 
30 PSI NT "Mettre la cassette originale.. 
EXT 

40 HODE 1:CALL tBD37:HEH0fiï fc7FFF:LQAD"!",fc8OO0:CALL J.8400 
50 DATA F3.21, tB,aû, U ( Û,S0,1,F0,1,7D,ED,4F,EII,5F.AE,EB,AE,E 
B, n, 23, 13, B, 76,81, 20, F2,3E,C3, 32, FE, 80,21,29, 84, 22, FF,60,C; 
,20,80,21,18,1,22,63,8,22,55,28,00,21,0,90,03,2,31 



lOBOCOI 



1 .10 'ROBOCQP 

-.20 HODE l:S0fl=Q:F0R N=&BFO0 TO tBF3A:BEAD A*:A=VAL . 

("t'+A*):P0KE N,A:SDH=SOH-tA:HEXT:!F S0HO547S THEN 
PRINT 'Erreurs dans les datas. ..*;END 
\30 INPUT "«les infinies ?";A$:1F UPPER*<A*)="0" TH 

EN POKE &SF25.&B6 

40 INPUT "Energie infinie ?";A*:IF UPPER»(A*)="0" I 

THEN POKE fcBF2A,0 

50 iNPUT "Teips infini ?";AI;1F UPPER*(At)="0» THE 

H POKE tcBF2F,&A7 
^60 INPUT "Reserves de «initions ?";A$:1F UPPEKJU» 

)="0" THEN POKE lBF34,fcll 
,70 PR1NT:PRINT 'Hettre la cassette originale. ..":F ! 

OR N=l TO 1000:NEXT 

80 HODE liCALL fcBD37:HEHQBi 47FFF:L0AD"! ",ia000;CA 

LL iBFQO 

90 DATA F3,2i,lB,B0,l,4E.i,ll,0,80,7D,ED,4F,ED,5F, 

AE,EB,AE,EB,77,23,13,B,7B,B1,20,F2,21,24,BF,22,51, 

80,C3,2C, 80, 3E, 35,32, A5, 4, 3E, 30,32,22, 3F, 3E,90,32, 

A5,4C,3E, 1, 32, 12, B, C3.66, 3F 




.■ : F0RN=lT0 1OOÛ:N |j 



SavagE 



10 'SAVAGE 

20 HODE iîiNPUT "Quel niveau voulez-vous char 

jer (1-3) ?»;A*:IF AK1 OB Aï>3 THFJ 20 ELSE 

DX=liA12A:CLS:QH AS GOTO 30,80,120 

30 PR1MT "PEEHIE8 NIVEAU ":PBiNT 

40 INPUT "Vies infinies î'iAïifiESTÛRE 22O;G0S 

UB 200 

50 INPUT "Energie infinie ? n ;A*:BESTOftE 230:G 

DSUB 200 

60 1HPUT "Sans enneiis ?";AÏ:RESTOBE 24Û:GÛSU 

B 200 

70 GQTû 170 

80 PftlMT "SECOND NIVEAU":PR1NT 

90 INPUT "Vies infinies ?";A*:BESTQBE 250:603' 

UB 200 
i 100 INPUT "inunite ?";AS:RESTQHE 260:GOSUB 2 

00 

110 GOTO 170 

120 PRINT "TBOISIEHE NIVEAU ":PfiiNT 

130 INPUT "Vies infinies ?"jA*:BEST0RE 270:GO 

SUB 200 

HO INPUT "Energie infinie ?";A*:RESTOHE 280: 

GOSUB 200 

150 INPUT "Sans enneiis ?";A»:RESTORE 290:G05 

UB 200 

160 INPUT "Noibre quelconque de pièces a detr 

uite ?";A*:RESTOfiE 3OO:G0SUB 200 
• 170 POKE W.dCaiPOKE D«tl,0:POKE D»t2,l 

180 PR1NT:PBINT 'Hettre la cassette originale 
avec le niveau *A*:FOR W=K TQ 2OOO:NEXT:H0D 

E 1:CALL fcBD37:MEH0HF &9FFF 
'•-190 A$= , !LEVEL"+8IGH7»(STB*{A*),1)+"! , :L0AD A 

*,iAOOO:P0KE &A0E2,fc2A:P0KE fcA0E3,àAl:CALL &A 

000 

200 (F UPPER*(AtK>"D" THEN REÎURN 

210 BEAT) AI: IF «="*« THEN RETURH ELSE POKE D 

ï,VAL("J<"*A$):Dï-D*H:GGTO 210 

220 DATA 3E,A7, 32, 2E,e, 32,45, D,32,2B,DF,« 

230 DATA 3E,À7,32,Jjy, 32,57,4,32, 1A.DF,* 

240 DATA 3£,1,32,AA,4,* 

250 DATA 3E,A7 1 32,63,D,ll 

260 DATA 3E,C3 f 32,3A,D;* 

270 DATA 3E,A7,32,2A,E7 1 * 

280 DATA 3E,A7,32,74,E7,* 

290 DATA 3E.C9, 32,18,58.» 

300 DATA 3E,C3,32,9E,6,i 




>AMURAIWARRIOl 



10 'SAHUHAI UARB1DB 

20 HQDE 1:CALL i8D37:L=110 

30 FOR X=iBFQO TO iBF92 STEP 12 

40 L=L+10:BEAD LlGN$,CHKt:CHK=0 

50 FOB ï=l TO 24 STEP 2 

60 BÏ=VAL("fc"*r1lD*lLlGH*,ï,Z>> 

70 CHK=CHK+BT 

80 POKE X+Y/2.BY 

90 NEXT 

100 IF CHKOVALC4"+CHK*) THEN PB1NT "E 

reur...*:END 

110 HEn:CALL &BFOO:L0CATE 1,24:PBINT « 

ettre le prograue original. ..":BUN ■!* 

120 DATA 3A7ABC3226BF2A7BBC2227BF.4F0 

130 DATA 3EC32118BF327ABC227BBCC9,583 

140 DATA F53A46BFFEFF2B093EFF324fi,617 

150 DATA BFF1000000ES3EC321478F32,4EF 

160 DATA 7Q3E22713E3A26BF2A27BF32,3E0 

170 DATA 7ABC227BBCE1F1C37ABC0032,68C 

180 DATA 4GA114F53A92BF3CFE322Q1A,521 

190 DATA E52173BF3EC3323A01223B01.404 

200 DATA 3E322146A1327Q3E22713EE1,40A 

210 DATA FlE932B2BFFtE9E5F53EC321,833 

220 DATA 85BF327501227601FlEiC348,562 

230 DATA 01F53EB7320817F1010101C3,3F3 

240 DATA 780100000000000000000000,079 






HEDEEl 



20 HEHQRÎ fâ000:HQDE 1:80BDER 

0:L1GN=110 

30 FOR K=i9340 TÛ fc95E0:READ A 

*:A=lfAL( , Ii' , +A$)sOCT=KTU 

40 IF 0CK17 THEN PQKE N,A:SDH 

=SD«+A+2S5* (S0M+A>255 ) : GOTO 70 

50 [F SQHOA TKEH PR1NT 'Erreu 

t a la ligne *;LIGN:END 

60 SÛH=0:OCT=0:N=H-1:LIGN=LIGN 

no 

70 NEXT:FQR H=0 TÛ 15:READ A»: 

A=VAL("4'*A*):1NK N,A:NEÏT 

80 OUT UA7E,i:PRINT "Hettre l 

a disquette originale et anpuy 

ez sur une touche. ,.":CALL fcBB 

06 

90 OUT 4BCOÛ,l:ÛUT 4BDO0,32:0U 

T 48000,2:007 4BDO0.42 

100 iHK i,6:MÛDE 0:0UT tBCQÛ,6 

:0UT &BD00,24:CALL 1.9340 

110 DATA F3,DD,21,B1,95,DD,66, 

00,DD.23,DD,6E,00,DD,23,22,EE 

120 DATA 9E,95,5D,CD,75,94,21, 

98,95,35,CA,FB,93,DD,7E,00,A4 

130 DATA 32,E7,93,DD,23 1 DD,7E, 

00,32,D2,93,DD,23,DD,7E,00,01 

140 DATA 32.D9, 93,32, EA,93,DD, 

23, DD, 23, DD, 23,00,01,95, 22, D9 

ISO DATA 90,95, ED,43,8£,95,E5, 

21,OO,OO,59,S0,A7,06,09,CB,AE 

160 DATA 1A,CB,1B,CB,1C,CB,1D, 

10,F6.06.07,A7,CB,lC,CB,iD,5E 
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170 DATA 
78,32,92 
180 DATA 
93,95,7A 
190 DATA 
22,95,95 
200 DATA 
7E,EE,22 
210 DATA 
00,7E,EE. 
220 DATA 
95,C3.5G. 
230 DATA 
05,59,03. 
240 DATA 
38,94,D2. 
250 DATA 
AF, 32,9F. 
260 DATA 
C9,D5,E5. 
270 DATA 
FB,21,A8, 
280 DATA 
94,E5,CD, 
290 DATA 
9S,FE,80, 
300 DATA 
FB,3E,0F, 
310 DATA 
CD,EA,94, 
320 DATA 
EA.94,23, 
330 DATA 
A4,94,E6, 
340 DATA 
F2,B5,94, 
350 DATA 



10,F9,22, 
,95,B7,28. 
OC, 94, Ci, 
,83, 28,00. 
95, CD, OC, 
,2A, 90,95. 
95,06,00, 
,4F,A8,41. 
7A,B3,20, 
22,4F,A8, 
1B,7A,B3, 
93.3E.A7. 
32,90,61, 
36,A3,3A, 
C1,4F,3A, 
4C,93,3A, 
32,9F, 95, 
95,3A,9E, 
9E,95,5F, 
79.32.AC, 
95,78,32, 
95,1E,09, 
E1,ED,5B, 
CF,94,E1, 
95,FE,40, 
20.07.3A, 
C0,37,C9, 
CD,EA,94. 
94,7B,CD, 
CD,CF,94, 
E6,20,2B, 
1D,20,F8, 
ED,79,0D, 
20,2Q,F1, 
78,77,0D, 
E6,20,C8. 
ED,OC,ED, 



93, 95, 43, El, 
,07,C5,CD,C7 
10,F9,ED,5B, 
.ED, 53, 95, 19 
94, 21, FF, FF, 
ED,5B.8E,9A 
D5,E5, 19,28, 
77,28, 1B.22 
F3,E1,D1,06, 
41, 77, 23,5F 
2Q,F3,CD,35, 
32,79,5C,91 
32, 2F, 6F, 32, 
9F, 95, C6, 59 
9E, 95, 47, CD, 
9F,95,3C,BF 
FE,OA,C0,E5, 
95,3C,32,0B 
CD, 75, 94, El, 
95,32,AE,A1 
AA, 95,01,76, 
CD,95,94,7A 
95, 95, CD, B5, 
D1,3A,A1,16 
2O,0E,3A,A2, 
A3,95,B7,47 
A7,CS,01,7E, 
AF,C0,EA,B1 
EA,94,3E,08, 
3A, Al, 95, 94 
F1,C9,7E,CD, 
C9,0C,7E,64 
23,ED,78,F2, 
C9,0C,ED,07 
23,1B,ED,78, 
7A,B3,20,FC 
7B,0D,ED,78, 



F2.C5.94, 
360 DATA 
FA,OC,ED, 
370 DATA 
20,E9,C9. 
380 DATA 
79,0D,3E. 
390 DATA 
66,00, DD 
400 DATA 
6E,00,DD 
410 DATA 
32, SB, 95. 
420 DATA 
95,B7,28. 
430 DATA 
89,95, A7 
440 DATA 
66,95, 2A 
450 DATA 
32,60,95 
460 DATA 
C9,0B,0B 
470 DATA 
00,00,00. 
480 DATA 
00,04,02. 
490 DATA 
01,4C,00 
500 DATA 
12,4A,D5 
510 DATA 
58,76,58 
520 DATA 
03,15,01 
530 DATA 
1A,02,06 



E6.20.20, 
Ai,95,ED, 
7B,0D,77, 
3D,20,FD, 
F5,FS,ED. 
FB,87,30, 
05,3D,0O : 



F3,C9, 21,27 
78,FE,C0,38, 
23,3E,05,ED- 
ED,78,E6,10, 
78,87,30,96 
00, Fi, OC, ED, 
20,FC,F1,B5 



C9,DD,6E,00,DD,23,I 



23.DD.4E. 
DD, 46,00, 
23,DD,66. 
22,89,95, 
DD,23,DD. 
8C,95,DD, 
2A,2A,90. 
5B,6E,95, 
ED.52,22. 
D1,C1,E1, 
89,95,22 
87,95,22, 
7£,FE,00. 
13,23,06, 
C5,23,7E : 
12,13,10, 
00,00,00, 
00,00,00, 
03,04,05, 
01,40,80, 
30,00,70. 
FF, 02, 09, 
B6,2A,00 
5C,9E,42, 
78,25,00. 
5A,B3,43, 
1)0,00.00 
00, 00,1 A, 
13,16,0c, 



00, DD, 23, 89 
DD,23,E5,DD, 
00,DD,23,9D 
E1,DD,7E,00, 
7E, 00,32, 62 
23,C9,3A,BC, 
95,E5,ED,77 
D5,19,ED,5B, 
e7,95,E5,E3 
3A,8B,95,CD, 
8E,95,2A,54 
90,95,C9,F3, 
28,09,12,18 
78,Bi,20,F3, 
47,23, 7E.AF 
FC,C1,18,EA, 
03, 00, 00, F9 
00, 00, FF, FF, 
06,00,00,18 
00, 30, 50, 7C, 
02,7C,14,4B 
FE,52,E4,ED, 
40,25, 01, A8 
54,B1,EB,03, 
17,B8,81,47 
A3,A2,03,B2, 
00,00,00,66 
08,12,14,18, 
OA,QD.1B,OE 





10 'THE LAST N1NJA 2 

20 HÛDE iîPRIHT "Patientez.. .Charge 

■eut des datas !":L1GN=70;D1B=&AOOO 

iGOSUB B0:LIGN=280:DIR=bBF00:GDSUB 

50 

30 CLS:PR1NT "Mettre la cassette or 

lginale...":FOR N=l TO tûûO : NEXT : CA 

LL fcBD37 

40 HÛDE liHEMÛHY i37C0:LOAD "!",fc37 



C1:CALL &3B7C:L0AD V'.HOOOîCALL U 

BFOO 

50 REAB Aï: IF At="«' THEN EETU8N 

60 EEAD TOT:SDtM):FÛfi N=l TO 20 STE 

P 2:A=VAL("lt"+HlD$(Al,N,2»:PQKE 01 

fi,A:DIR=DIB+l:S0fl=SOH+A:NEXT:lF SDH 

=TOT THEN LIGN=LIGH+10:G0T0 50 &SE 

PRINT "Erreur a la ligne *LIGN:END 
70 DATA F321004001Q3Q33E8BED,7B5 
80 DATA 4FED5FAE7700230B7BB1 , 1047 
90 DATA 20FSED5FC6 1921 2E400 1 , S 76 
100 DATA E)5Q2ED4FED5FAE770023,li9i 
110 DATA 0B7BB120F5210040110Û,699 
120 DATA B9010303EDB03E403236,835 
130 DATA B93EC33254B9214B0522,908 

140 DATA 55BBC32EB9DD2 1 D9BB 1 1 1 i 371 



150 DATA C300CD67BB2100002274,873 
160 DATA BC216405229ABCC303BC,10B8 
170 DATA 216D0522A600C3400QAF,7B1 
1B0 DATA 3Z9C3C3EC3329CAB217F, 1060 
190 DATA 05229DABC340063E10CD,9i5 
200 DATA 37ACCD05BCDÛF5C5D5E5, 1717 
210 DATA 21B0053A0040BE2B0523,606 
220 DATA 232318F5AF235E235612, 782 
230 DATA 3EC3329CAB217F05229D.990 
240 DATA ABE1D1C1F1C91 1B73A03, 1501 
250 DATA AD3D220B3DC5EA3B3AE3,1115 
260 DATA 30000000000000000000,61 
270 DATA * 

2B0 DATA F32100A01 1ÛO0501BFÛ0, 650 
290 DATA EDB0C3OO050O000O0OO0.613 
300 DATA « 




: ' . ■ ■ ■ ■ ■■:■■■■ 
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30 IHPUT "Teips bloque VfUMt liPPEK*(A*)= n O* THEN PDKE fcBF 

D1.0 

40 INPUT "Réserve d'eau bloquée ? S ;A»:1F UPPEEt(At]="0" THEN 

POKE fcBF22,0 
50 INPUT "Battements du coeur bloque ?";A*:1F UPPEE*(AÏJ="Û* 

THEN POKE &BF27,0:P0KE fcBF2C,0:POKE lcBF31,0:P0KE &rBF36,b3A ; 
60 INPUT "Posséder 5 croix ankhs en perianence ?";AÏ:IF UPPE j 
RÏ(A*)="0" THEN POKE &BF3B t fc2liP0KE aBF40,a36:POKE tBF45,0 
70 PEINT:PRINT "Hettre la cassette originale. .."îFOR N=l TO ; 
1000:KEIT 

80 CALL iBD37:HE«0RÏ fc3FFF:M0DE 1,-LOAD "!", 64000 :CALL fcBFOO 
90 DATA 21, 0,40,11, AO.F, 1, 95,0, ED,B0,3E,C3, 32,6, 10,21, 19.BF, : 
22,7,10,C3,A0 1 F,CD,CE,BC,3E,34,32,t,6A,3E,3D,32,59,6A,3E,77 1 | 
32,FE,62,3E,35,32,4C,6A,3E,35,32,AC,6B,3E,32,32,18,76,3E,3A, : 
32,EE,67,3E,FE,32,F1,67,3E,2,32,F4,67,C9 



I 
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10 'THUNDER BLADE 

20 HEHOBY fc3FFF:N0DE liPRIHT "Patientez. 

.. Chargeient des datas !*:PRIKT:LIGH=12 

Q:DIR=i9C40 

30 READ AtilF **=**■ THEN 60 

40 IF A*="0»THEN FOR DiR=DlR TO DIR+9:P0 

KE DIM:NEIT:LIGN=LIGH+10:GQÎO 30 

50 READ TOT:-S0H=O:F0R H=l TO 20 STEP 2:A 

=VAl!'t , +H[D*(AI,N,2)):SGH=SÛM+A:PÛKE 01 

R,A:D[R=DIR+1:NEIT:IF SOH=T0T THEN LiGN= 

LIGH+1Û:G0TÛ 30 ELSE PRINT "Erreur a la 

ligne "LIGN:END 

60 HOBE i:DlM A(8):FÛS H=l TG 8:READ A(N 

):NFJT 

70 INPUT "Vies infinies ?";A*:IF UPPEB*( 

A*)="G" THEH POKE fc9E4F,0 

80 INPUT "Phase initiale ?";A*;IF LEN(At 

)<>0 THEN V=VALIA*):!F V>-0 AND v<=8 THE 

N POKE &9E57,0:POKE b9E5C,0:POKE fc9E61,A 

IV) 

90 INPUT "Insensible aux chocs ?";At:lF 

UPPEH(A$)="0' THEN POKE &9E66,Sl18 

100 PRlHTiPRlNT "Mettre la cassette orig 

inale...":FOfi N=l TO 100O:NOT 

110 CALL bBD37 : HODE 1:LQAD "! , ,HOÛO:BGR 

DES 11:INK 0,11: INK 1,24: iNK 2,2:INK 3,0 

:FOR N=l TO 200:NEXT:CALL t9CFC 

120 DATA F760FFOQOOQA00499CtC,697 

130 DATA FF1CFF1B00005B000Q2A,695 

140 DATA 9ËD07O0OQ00O400O0(Ï00,542 

150 DATA 

16(1 DATA 

170 DATA 

180 DATA 

190 DATA 



350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 
550 DATA 
560 DATA 
570 DATA 
580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 



0000Q0OOO0GOQOOOF3DD, 
21B39A210OCOO6C8DD75, 
OODD23DD7400DD237CCG, 
06673004 115QC01910EA, 
31B39A3E1006F6ED7926. 
32069C3E1SCDF99D30F5, 
3EC6B83OF02520EF06C9, 
CDFD9D30E678FED430F4, 
CDFD9D3ÛDC00DD21S99C, 
110200ED5FÛ6122E017B, 
06D7CDF99DD2969E3EE7, 
B8CB153E00003E15D258, 
9D3A589C8532589C653A, 
F29FAAABDDACDDADADDD, 
77000609CB63280D3AF2, 
9FC65B839232F29F0505, 
053AF29FC61732F29FDD, 
231B7AB3C2559DC3BA9D, 
11E79DED53A69D8 10601, 
D17A83C8DDE1189B2A59, 
9CU4007ED52C2969E21. 
D59D22A69DDDE1U5000, 
0601C3S59DD17AB3CAA8. 
9DD5DDE 1131 150000603, 
C3559DD17AB3CBDDE12L 
34BF22049E230603C355, 
9DCD0D9ED0C3009E7BE6. 
07CA069E3EÛ0C30B9E3E, 
133D20FDA704C83EF5DB, 
FF1FC8A9E6W28F379 I 2F, 
4F3E0OOOOOC32B9E37C9. 
7C21579C8623BEC2969E, 
217B9C117C9C01C2Û136, 
00EDB0AFQ6FfiED7901BD, 
7FD9EI31F8BF3E0132A3, 
1132E2113E323275.033E, 
3E3276033EOO323EO23E , 
2032CD0932DF09CD09B9, 
CDO3B9C34OOÛ000OOO00. 



00000000000000000100,1 
F6ED4901897FED49C300, 1326 



1262 
1400 



1340 
1333 



7KTDATA 
740-8ATA 
-75ÛDATA 
■760 DATA 
-770 DATA 
780 -DATA 
790 DATA 
800 DATA 
810 DATA 
-620 DATA 
830 DATA 

840 DATA 00OOOO0O000OO00O00D9,217 
850 DATA 05C2689F13130D007BFE,B77 
860 DATA 1A201821979F22FE9D23,905 
870 DATA D93E0FC30D9ED921 199F, 1094- 
880 DATA 22FE9DiES41ô02ED5F i 16,875 ■ 
890 DATA 07237BDG14A71F4F06bo,6e8 
900 DATA 21EF9F097E01F39FB76F.1215 
910 DATA 260009 1F4F3ES0914F06, 523 
920 DATA O57A16COD9C3OD9E7832,1094 
930 DATA 8A9FO6027E1213237E12,647 
940 DATA 1B7AC60857230D200721,562 
950 DATA F39F10EC1805CB10E718.1154 
960 DATA 00O6003E03CB653E033E.502 
970 DATA 03D9C30D9ED92tEF9F06,1240 
980 DATA 027EE6072803351805tE,520 
990 DATA 2016403D2310F006031C,507 
1000 DATA 3E0B35F2CA9F3EO5364F,B26 
1010 DATA 1C2B35F2CA9F3E02364F,924 
1020 DATA 2B3526002EE021009E22.629 
1030 DATA FE9DD9C30D9E0O0O0000,994 
1040 DATA 
1050 DATA 

1060 DATA OOOQ003010iFD400000Û,307 
1070 DATA » 
1080 DATA 0,2,3,5,6,8,9,11 
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20 «rtAKHODE 1 

30 FO» N'SA4F3 TO 1A675;BEAD AI:A=IAL("l'tAt) X. >\ 

40 S0H=S0H+A:P01Œ H.AiNEIT 

50 IF S0HO41638 THFJf PRIHT 'Erreurs dans les datas...': 

EHD 

60 PfiirIT "Hettre la disquette originale et appuyez sur u 

ne touche...* 

70 OUI 1FA7E,1:CALL UBOS.'Cl&CaU. U4F3 

80 DATA F3.3E, 02,21, 40,02,CD,03,A5,AF, 32,45, 13,03,72,80 

30 DATA 4F,DD,21,6B,A6,DD,7E,0O,B9,28,OA,DD,23,DD,23,D0 

100 DATA 23,DD, 23,18,F0,DD,56,01,D0,5E,02,DD,46,O3,3E,19 

X 110 DATA 93,38,38,07, 7B,80,3D,4F,C3,47,A5,0E,18,C5,F5,E5 
, \120 DATA D5,CD,47,A5,D1,E1,F1,C1,5F,78,93,47,7C,83,67,1E 
130 DATA 01,14,18,DA,3E,4C,32,49,A6,3E,06,32,4E,A6,79,10 
140 DATA 93,32,F6,A5,7B,32,E1,A5,1E,01,4B,C3,69,A5,S9,AF 
150 DATA 32,F6,A5,32,E1,A5,7A,32,42,A6,32,4B,A6,22,97,A5 
160 DATA 7B,32,4D,A6,79,32,4F,A6,11,45,A6,CD,B1,A5,3A,62 

X 170 DATA A6,B7,20,F4,11,3F,A6,CD,9B,A5,11,45,A6,CD,B1,A5 

-.180 DATA 11,48,A6,21,6B,A6,18,1E,CD,AC,A5,11,43,A6,CD,B1 
190 DATA A5,21,62,A6,CB,6E,28,F3,C9,01,39,A6,18,0B,Ol,21 
200 DATA A6,21,62,A6, 16,03,01, EA,AS,ED,43,E3,A5,1A,47,C5 
.210 DATA 13,1A,01,7E,FB,F5,ED,78,87,30,FB,FA,C9,A5,F1,OC 

>220 DATA ED, 79,06,08, 10,FE,C1, 10, E6,01,7E,FB,ll, 00,00,03 



10 "TYPHOON 

20 HEHOfiT b9000:HODE 1 

30 FOB N=iA520 TO aA68C:BEAD At!A=VAL("li"tA)> 
40 SO»=SOMi*iPOKE N,A:NEIT 

50 IF S0BO41062 THEK PEINT 'Erreurs dans les datas.. .VEND „. 
£n Eû ,,rr ■» „ , j, ,, ... \230 DATA EA,A5,OC,ED,78,00,1B,ED,7B,F2,EA,A5,7A,B3,C2,E5 

6 PB NT ■ ettre la disquette or.'in.le pu.s appuyez s», une^ fl „ J*OC,B ^olKlMWCM» A6 

touche. . . . * 

70 CAL1, IdMMODE 2.INK 0.0.1NX l.O.CAU IBD19,CALL IA520 , 2 ™ ™ S'S'S'S'îf 'S'- » ™ ÎS'S'if'i!'!. ™ '2 

,260 DATA OD,ED,7B,F2,14,A6,E6,20,C2,10,A6,21,62,A6,ED,7B 



80 DATA F3,01,7E,FA,3E,01,ED,79,21,60,1E,CD,40,A5,3E,02 
SO DATA 21,00,CO,CD,4Û,A5.AF ) 32,76,FO,32,28.Fl,C3,fi0,lE 
100 DATA DD, 21, 85,A6, 4F, DD.7E, 00,89,28, 0A.DD,23,DD,23,DD 
110 DATA 23,DD,23.ie 1 FO,DD,56,01,DD,5E,02,DD l 46,03,3E,06 
120 DATA 93,BB,38,07,7B,B0,3D,4F,C3,88,A5,0E,05,C5,F5,E5 
130 DATA D5,CD,6e,A5,Dl,El,Fl,Cl,5F,7e,93,47,CB,23,CB,23 
140 DATA 7C,83,67,lE,01.14,i8,D6,7A,32,GC,AG,32,75,A6,22 
150 DATA C9.AS, 78,32, 77,A6, 79,32, 79,A6, 18,11, 7A,32,6C,A6 
160 DATA 32,75,AG,22,C9,A5,79,32,77,AG,32,79,A6,il,6F,A6 
170 DATA CD,E5,A5,3A,7D,A6,B7,20,F4,11,69,A6,CD,CF,A5,U 
160 DATA 6F,A6 l CD > Ë5,A5,tl,72,A6,21,8S,A6,CD,ED,A5,C9,CD 
190 DATA E0,A5,lt,6D l A6,CD,E5,A5,21,7D,A6,CB,6E,28,F3,C9 
200 DATA 01.3B.A6, 18,OB,01, 1A,A6, 21, 7D,A6, 18,03,01, 0F,A6 
210 DATA ED 1 43,07,A6,1A,47,13,CS,ÎA,13,CD,3E,AG,C1,10,F7 
220 DATA 01,7E,FB,ll,10,20,C3,0F,A6,OC,ED,78,77,0D,23,ED 
230 DATA 78,F2,OF,A6,A2,2O,F2,21,7D,A6,ED,78,FE,C0,38,FA, 
240 DATA OC,ED,78,77,OD,23,3E,05,3D,2O,FD,ED,78,A3,2O,EA 
250 DATA 3A,7E,A6,E6,04,CO,37,C9,ED,78,F2,38,A6,C9,01,7E 
260 DATA FB,F5 ( ED,78,87,30,FE,87,30,02,F1,C9,F1,0C,ED,79 
270 DATA 0D,3E,05,3D,00,20,FC,C9,C5,06,F5,ED,78,1F,38,FB 
280 DATA ED, 78, IF, 30,FB, Cl, 10,FO,C9, 03,0F, 00,00, 01, 08,02 
290 DATA 4A,00,09,4C,00, 00,00, 49, 03,49,2A,FF,00, 00,07, 00 
300 DATA 00,00, 00,90,A8, 01, 05, 01, 09, 02, 06, 05, 10,00,00,00 



270 DATA FE,C0,38,FA,OC,ED,78,77,OD,23,3E,O5,3D,20,FD,ED 
280 DATA 7B,E6.10,20,E9,C9 < ED,78,F2,39 < A6,C9,03,OF,00,00 

\,290 DATA 01, M,02,4A, 00,09,40,00, 00, 00,49,02,49,2A,FF, 00 
300 DATA 01, 02,OD,OB,OA,14,03,1A, 09,12, 15,10, 18,06,85,40 
,310 DATA 80,00,00,00, 49, 02,00,00,01, 05,01, 40,02,07,11, 9B 

\ 320 DATA E5,0E, 04,00,00,00,00,00, 00,00,00,00,00,00,00,00 




* 



°v/<rp> oooo 

■9S!B|6UE UOJSJ9A 

eun lueweujBueo luojejejejd sejsLind 
se - ] ■ejnpei E| b iueiue|B6e juesmu mb 
eqdBJÔOLjyo.p seinBj sep J6|jed sues 
(«sejepsjEo» JBd siueuieiEjeini sjmp 

-BJJ }UOS S86BUUOSJ8d S8|) eSjBAnBUJ 

lusujjEJA jse isnuBiu np }8 )6!oi6o| np 
8S|b5ubjj uojpnpBJi B| enb yiouns je 
UBJoej ep euBp B| ssd iussuoabj eu 
sjne|noo se| enb 'e|qBai6B sej} sjnofnoi 
sEd ise.u eujs!qdBj6 9| enb euped 
-oie.u |{ 'seuooi jsd nef np uo|ise6 B| 
ep je ouBueos np nBSAm ns semEnb 
seujEyeo ejuesejd ejoi jo sewn js 




pnbiuniuiuoouo^: fifvjipm xuj 
uiSuo : **>d Btipj 

•aauiuiouaj v\ ap jauScS isuie }a saui 
-8ma sanbpnb ajpnosai b jmaAJBd zaïJA 
-ap snoA uBjd ai jed apie }uauiajBuiJoj\i 

■(b5 auiuioD 
}sap 'mo qa) ajqureqo aun japuEuiap m\ 
;a aisiSaaqnB un jaAnoj; Ejpnej \i 'sjnoa 
ua ai}jed aun japjBSaAnes zajnoA snoA ïg 



e# <S A ^ <s> -m> 






•sanm aj}a ;uaAnad sn 
's:)a(qo saD ap ;uauiap;dBj snoA-zajeduig 
uo,p saoaid sap no uiuiaqajed un 'uopod 
aun : xna ajaujap asoqa anbjanb ;uojas 
-srej s}joui saiiBSjaApe soa 'luaAnos sajx 

■UBJ3 un,p puaa 

-sap (aiSnoq aun jed aasipquiXs) aiqBjiA 

aHOA ' sdnoD sap zauajd snoA anbsjoq 

■ajig uojnoq aj ms suoissaid 

ap uoissaoans aun xed sajSai îuaurajduns 

mo; iuos sjj -S}Bquio3 saj : sojaq ajjou ap 

ajTAipB ajme aun e jireuajureui suossbj 

■xioqa uos ja^uiod 

ap jujns n 'sa^uasui efap }uos sasuodaj 

sa\ & suopsanb sai sa^noi anbsmd anâuej 

ap auiajqojd unane 'aa^nasip jnoj 

■sÀed np zanxAnco 

-ap snoA 'ja^daaaB v svd zaiisaq,i\j 

•uoissiui aun jasodojd 

snoA sh-juoa suiB^iao auiaui aiya 

-mad }a ajpuajdde snoA b sasoqo 

sap îuauiaure^iaD ?uo a8jaqnB,i ap 

siuayp sar\ ■ jajjB A jioAnod ba uo uog 

l aauBiquiej 

suep }UBuaîuiBui sa^ snoA 'isa A b^> 



■jajAj apuejQ B( JBd pns 
ns ^ ajiou ;aJoi v\ md pjou ns aap 
-loq 'aip 3}ubu v\ aAnoj} uo 'aaii 
-uod B| ap }sano afluaa nB '^ajja ug 



•q^ajBqiv.P 

auinBXoj np uB^d 3\ suouiuiBxa 'suoÀo/\ 

l UBjBjg ssd zassiBuuoD au snoA luauiuio^ 

•UBjBjg b «sioq ap ajnanS 

bi» aSaaqnB,! ap ajiBuuoisuad ai saia snoA 

'îuauiaauauiuioD ai JBd suobuauiuioa sibj^ 

■sajqBpuBuiujoaaj saji sBd sasoqD 

sap auiaui }a s^ububabj sap 'saaqBqDaeui 

sap 'sanbjo sap 'sjnajoA sap 'sa;siSjaq 

-nB sap 'sjjas sap : siuauiaaB|dap soa ap 

sjoj sajn^BajD sap jasiojD ua za^B snoA ;g 

■ajoq jo sami j_ ap 

sjaAiun.i }uasoduioD mb saâBuuosjad sa{ 

JBd nat np sjnoD nB sajaAaj ;uojas snoA p 

-xnaa p ajpuja«B b s^nq sjnaisnid b A \\ 

•aiqBi 
-U3A a;anb aun,p aauasqBj ;sa ouBuaas 
np a}UBuiSuo,j an;i}suoa mb aa jibj ug 

•«P 
luauiaidojd na[ ne zauaAaj ya sbSbuuos 
-jad sap aqaiBui nB sawa^duia soa auop 
saijBg 'unBui saj; SBd sibui a^snqoi }sa 
'aaej bs ap xnaa snoi auiuioo' mb ajBqjBg 
ai uijua ^ (mo qo 'mo qo) asnapejâ saj; 
ya buSe saj; 'bijâ^bm bi 'saniBui ap a«o3 
bs ap n^Aaj jaqBAaqa aq : saSeuuosjad 
sioji ajjua xioqD a\ bjjjo ajc]: jo sauiix 
•aipBâBs jnaj ap auSip 
aSuanBqD nBaAnou un ja;uojjiE anod 
janiaAai as jioAap luauiaure^iaD juoa ^ 
a^nb jna^ suBp snpiad s jaimjuaAB sarj ^ 
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i jbuij nBajqB} np .raip 
-ojddBJ snoA }a nBa^Bip a{ sucp jaijauad 
isuie zaxmod sno,\ ■■■ ajremSuBU} ap 
bj lajadriDaj iane,p BJwauuad snoA 'uois 
-sassod aaioA ua sioj aun 'mb apuoi ap 
bj 'nea,i.suep zaaaquioi shoa puBnb aiA 
aun ajpjad ap BaajiAa snoA mb jbisiid a\ 
'ajduiaxa md 'auiuioo pp np juojpuaiA 
snoA inb sapre sap 'jns uaiq 'tssne zaïAasai 
snoA sieui zaïaoïuœuaj snoA anb siurau 
-ua,p sacLC; 8 sap sun-sanbpnb juos sajid 
-uiba sap no sauigiirej sap 'sBinrand saQ 
■sjos-snos saïquios sas suep jauiuuaïmod 
ja nBajBip ne Bjauaui snoA mb ao 'juod 
a\ snos siuiauua sap ai^uquioa ap iubab 
jie upid ua apjBd aun isuib zaias.iaAB.ii 
snoy\ ■ Jimcoied zaAap snoA anb sasBud ^ 
sapSuoinB;no}samuiissip saiaBs xnofrq 
sioj} jiJAnoDap sn(d ua Bjpnej n '.laïaq^ 
3\ ap }a putuof jaAnojrai ap sed Eiyms 
au \i 'juauiamag ■ jaiAirap aj jmod aioAnod 
anoA ua }sa mb aa mo} ainy ap jajua; zaflE 
snoA 'ajad aqoA ap a^y auuoq ua 'no x>mq 
ap aumBÀb^ np anbiisBiuBi apuoui 
3\ suep ïinpoi;ui snoA ppiSoj 33 
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-eqojBd so ep eupjsipej E| jnod lajej 
-uj ureyeo un auuop m| nef ap uouew 
-iubj 'sjneqoojooE iu8W8jei|no!UEd SEd 
;uos eu pio 13 sp saws!i|dBj6 sa| is 
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l uou 'iBtua8 'sapsnui 
sojS soa aiSjaua ua .raSiBipai ap jioa 
-nod ai b mb auiuiaj aipad sijoa iioab^ 
lua^uos uaiq zaias snoA 'uyug -as^uBipus 
ap bi ia}aipB jnod anm saiî Bias mb jo,p 
3BS un '}jBd ajmB,p '}3 ua3Q ap aureuiop 
nB iapaDDB y p jauuad snoA mb adurej aun 
otbj snoA ji 'vred aun y p '. uoissiui aiiOA 
iissnai ap uijb jaAnoi} e siafqo sap zaAB 
snoA 'sairesjaApB sjua.ia.fjip axiuœ lau 
-aui zaiAap snoA anb sjBquioa saj aj;no 

■arauejd 
Bj amoj ap aijEuiajdns bj juanbaB jusj 
-naA mb jEjrç np saoïoj 'ubjes ap suoiS 
-aj sap suibui xnB oaquioï SBd îuaumiosqB 
}iop au mb uiuiaqaiBd un jaAnoiraj ap 
aSjBqa ^ ap^is aix nB a^iodsuBj; bjioa 
snoA 'ai}uo3 iBd '. auâsdsg ua juaurannu 
assBd as au na[ ao 'aj^i} 3\ ajpua^ua jas 
-sibj ïXBiinod anb aa b luauiaiiBi^uo^ 
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■aiîJBd sa;iBj 
ua snoA 'npuajua uaiq '}a sauuoipaps 
a}a }uo a|oaa aH3D ap sjuaurara smanpui 
sa]; 'mq^notnB j^duiai b îsb mb uoissiui 
bi inod -33iïsn( Bi ra jnsuuoq^ 'awaqn v\ 
}uos anb sanaiiusssa smsnîA sai au^diasTp 

3H3D SJ3ABJ1 B JIOIBA 3JIBJ 3p XnailS3p SJUB1 

-ïBquioa saunât sa^ sno^ ç a^iaAno a;BJB5[ 

3p aiUI3pB3B 3ldojd BS J33JD 3p 3;mSU3 

Eppsp n "uaq^ SuByv\ '?Jn[ xuiauus uos 
ans mot un B^ioduiai n/ n ^ miopia anb 
-liSB^uBi bi saidB aiq^iaa lUTAap mb ajBJ 
-B5( ap aj^jBui 'ui^ oq ap apuaSa^ v\ b 
aaua^spca uos ;iop sioixib^w iBâuBqg 
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-ndViOD IHHDna **P tuvssdtpv snoa 

U3 'stidxuoo %iod 'souv^ gz sp auuuos znbip 

-oui v\ xnod xdiraQxA S3[ snoa zaxinod snoa 

ja 3Udp\Suy U9 „sdnvq 0Z„ ttajpa inb 'sn 

-jassi» uns smuwvjSojd sap fuos m 'pfjd u% 

—xud 
xn3\ : uniumoo jmod un snoj \uo inb sispt8oi 
smbpnb sioiu anbmp suoiuxpxd snoa snopj 



